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 Sub3. 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.
| Kutools za Excel, z več kot 300 priročne funkcije, vam olajša delo. | ||
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)
| Kutools za Excel: 300+ funkcij, ki jih morate imeti v Excelu, 30-dnevno brezplačno preskusno obdobje od tu. |
Sorodni članki:
Nastavite širino stolpca in višino vrstice za obseg
Kako kvadratiti več celic v Excelu?
Najboljša pisarniška orodja za produktivnost
Napolnite svoje Excelove spretnosti s Kutools za Excel in izkusite učinkovitost kot še nikoli prej. Kutools za Excel ponuja več kot 300 naprednih funkcij za povečanje produktivnosti in prihranek časa. Kliknite tukaj, če želite pridobiti funkcijo, ki jo najbolj potrebujete...
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 miške za vas!
