Kako v Excelu nastavim velikost celice v cm (centimetrih)?
Na delovnem listu so prednastavljene privzete enote za višino vrstice in širino stolpca, privzeta širina stolpca je 8.38 znakov, privzeta višina vrstice pa 12.75 točke. In v Excelu vam je težko nastaviti višino vrstice ali širino stolpca v palcih ali centimetrih. Toda včasih morate za neke namene spremeniti višino in širino na centimetre. Kako bi lahko rešili to težavo?
Velikost celice nastavite v cm (centimetre) s kodo VBA
Z Kutools za Excel nastavite velikost celice v cm (centimetrih)
Velikost celice nastavite v cm (centimetre) s kodo VBA
Z Excelovimi funkcijami ne morete nastaviti višine in širine v centimetrih, razen za uporabo kode VBA. Spodnji dve kodi vam lahko pomagate nastaviti širino stolpca in višino vrstice. Naredite naslednje:
1. Izberite celice, za katere jih želite nastaviti v centimetrih.
2. klik Razvojni > Visual Basic, Novo Microsoft Visual Basic za aplikacije okno bo prikazano, kliknite Vstavi > Moduliin v modul vnesite naslednjo kodo:
Koda za nastavitev višine vrstice v centimetrih:
Sub RowHeightInCentimeters()
Dim cm As Single
cm = Application.InputBox("Enter Row Height in Centimeters", _
"Row Height (cm)", Type:=1)
If cm Then
Selection.RowHeight = Application.CentimetersToPoints(cm)
End If
End Sub
3. Nato kliknite 
za izvedbo kode. Pojavilo se bo pozivno polje, ki vam bo sporočilo, da vnesete številko višine vrstice. Oglejte si posnetek zaslona:
Opombe: številka, ki jo vnesete, mora biti manjša od 15. In ta koda VBA ne bo spremenila višine vrstice, če v to pogovorno okno vnesete 0.
4. klik OK. In višina vrstic izbranih celic je nastavljena z 2 centimetroma. Oglejte si posnetek zaslona:
Če želite nastaviti širino stolpca tudi v centimetrih, lahko vnesete naslednjo kodo:
Koda za nastavitev širine stolpca v centimetrih:
Sub ColumnWidthInCentimeters()
Dim cm As Single, points As Integer, savewidth As Integer
Dim lowerwidth As Integer, upwidth As Integer, curwidth As Integer
Dim Count As Integer
Application.ScreenUpdating = False
cm = Application.InputBox("Enter Column Width in Centimeters", _
"Column Width (cm)", Type:=1)
If cm = False Then Exit Sub
points = Application.CentimetersToPoints(cm)
savewidth = ActiveCell.ColumnWidth
ActiveCell.ColumnWidth = 255
If points > ActiveCell.Width Then
MsgBox "Width of " & cm & " is too large." & Chr(10) & _
"The maximum value is " & _
Format(ActiveCell.Width / 28.3464566929134, _
"0.00"), vbOKOnly + vbExclamation, "Width Error"
ActiveCell.ColumnWidth = savewidth
Exit Sub
End If
lowerwidth = 0
upwidth = 255
ActiveCell.ColumnWidth = 127.5
curwidth = ActiveCell.ColumnWidth
Count = 0
While (ActiveCell.Width <> points) And (Count < 20)
If ActiveCell.Width < points Then
lowerwidth = curwidth
Selection.ColumnWidth = (curwidth + upwidth) / 2
Else
upwidth = curwidth
Selection.ColumnWidth = (curwidth + lowerwidth) / 2
End If
curwidth = ActiveCell.ColumnWidth
Count = Count + 1
Wend
End Sub
Z Kutools za Excel nastavite velikost celice v cm (centimetrih)
Z zgornjimi kodami lahko nastavite velikost celice v centimetrih, danes pa vam predstavljam večnamensko orodje, Kutools za Excel ki lahko ne samo nastavi velikost celice v centimetrih, temveč tudi v palcih, funtih in pikslih.
Po namestitvi Kutools za Excel, naredite spodaj:（Brezplačno prenesite Kutools za Excel zdaj!)
1. Označite celice, ki jih želite nastaviti v centimetrih.
2. klik Kutools > Format > Adjust Cell Size, glej posnetek zaslona:
3. V Ljubljani Adjust Cell Size v pogovornem oknu izberite Unit type potrebujete in določite Row height in Column width iz Set values odsek. Oglejte si posnetek zaslona:
4. Nato kliknite OK or Uporabi. Dobili boste celice z 2 cm višine vrstice in 3 cm širine stolpca.
Z Kutools za Excel nastavite velikost celice v cm (centimetrih)
Sorodni članki:
Nastavite širino stolpca in višino vrstice za obseg
Kako kvadratiti več celic v Excelu?
Najboljša orodja za pisarniško produktivnost
Kutools za Excel rešuje večino vaših težav in poveča produktivnost za 80%
- Ponovna uporaba: Hitro vstavite zapletene formule, grafikoni in vse, kar ste že uporabljali; Šifriraj celice z geslom; Ustvari poštni seznam in pošiljanje e-pošte ...
- Vrstica Super Formula (enostavno urejanje več vrstic besedila in formule); Bralna postavitev (enostavno branje in urejanje velikega števila celic); Prilepite v filtrirani obseg...
- Združi celice / vrstice / stolpce brez izgube podatkov; Vsebina razdeljenih celic; Združi podvojene vrstice / stolpce... prepreči podvojene celice; Primerjaj obsege...
- Izberite Duplicate ali Unique Vrstice; Izberite prazne vrstice (vse celice so prazne); Super Find in Fuzzy Find v mnogih delovnih zvezkih; Naključna izbira ...
- Natančna kopija Več celic brez spreminjanja sklica formule; Samodejno ustvarjanje referenc na več listov; Vstavi oznake, Potrditvena polja in še več ...
- Izvleček besedila, Dodaj besedilo, Odstrani po položaju, Odstrani presledek; Ustvari in natisni vmesne seštevke strani Pretvarjanje med vsebino celic in komentarji...
- Super filter (shranite in uporabite sheme filtrov za druge liste); Napredno razvrščanje glede na mesec / teden / dan, pogostost in drugo; Poseben filter s krepko, ležeče ...
- Združite delovne zvezke in delovne liste; Spoji tabele na podlagi ključnih stolpcev; Razdelite podatke na več listov; Paketna pretvorba xls, xlsx in PDF...
- Več kot 300 zmogljivih funkcij. Podpira Office / Excel 2007-2019 in 365. Podpira vse jezike. Preprosta namestitev v vašem podjetju ali organizaciji. Vse funkcije 30-dnevnega brezplačnega preskusa. 60-dnevno jamstvo za vračilo denarja.
Kartica Office prinaša vmesnik z zavihki v Office in poenostavi vaše delo
- Omogočite urejanje in branje z zavihki v Wordu, Excelu, PowerPointu, Publisher, Access, Visio in Project.
- Odprite in ustvarite več dokumentov v novih zavihkih istega okna in ne v novih oknih.
- Poveča vašo produktivnost za 50% in vsak dan zmanjša na stotine klikov z miško!
