Excel'de cm (santimetre) cinsinden hücre boyutu nasıl ayarlanır?
Bir çalışma sayfasında, satır yüksekliği ve sütun genişliği için varsayılan birimler önceden ayarlanmıştır ve varsayılan sütun genişliği 8.38 karakterdir ve varsayılan satır yüksekliği 12.75 puntodur. Ve Excel'de, satır yüksekliğini veya sütun genişliğini inç veya santimetre olarak ayarlamak sizin için zordur. Ancak bazen bir amaç için yüksekliği ve genişliği santimetre olarak değiştirmeniz gerekir. Bu sorunu nasıl çözebilirsin?
VBA kodu ile hücre boyutunu cm (santimetre) olarak ayarlayın
Kutools for Excel ile hücre boyutunu cm (santimetre) olarak ayarlayın
VBA kodu ile hücre boyutunu cm (santimetre) olarak ayarlayın
VBA kodunu kullanmak dışında Excel'in işlevleriyle yüksekliği ve genişliği santimetre olarak ayarlayamazsınız. Aşağıdaki iki kod, sütun genişliğini ve satır yüksekliğini ayarlamanıza yardımcı olabilir. Aşağıdaki gibi yapın:
1. Santimetre cinsinden ayarlamak istediğiniz hücreleri seçin.
2. tık Geliştirici > Visual Basic, Yeni bir Uygulamalar için Microsoft Visual Basic pencere görüntülenecek, tıklayın Ekle > modülve aşağıdaki kodu Modüle girin:
Satır yüksekliğini santimetre cinsinden ayarlama kodu:
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. Sonra tıklayın kodu yürütmek için düğmesine basın. Ve size bir dizi satır yüksekliği girmenizi söyleyen bir istem kutusu açılacaktır. Ekran görüntüsüne bakın:
not: girdiğiniz sayı 15'ten küçük olmalıdır. Ve bu iletişim kutusuna 0 girerseniz bu VBA kodu satır yüksekliğini değiştirmez.
4. tık OK. Ve seçilen hücrelerin sıra yüksekliği 2 santimetre olarak ayarlandı. Ekran görüntüsüne bakın:
Sütun genişliğini santimetre olarak da ayarlamak isterseniz, aşağıdaki kodu girebilirsiniz:
Sütun genişliğini santimetre cinsinden ayarlama kodu:
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
Kutools for Excel ile hücre boyutunu cm (santimetre) olarak ayarlayın
Yukarıdaki kodlarla hücre boyutunu yalnızca santimetre olarak ayarlayabilirsiniz, bugün size çok işlevli bir araç tanıtacağım, Kutools for Excel Bu sadece hücre boyutunu santimetre olarak değil, aynı zamanda inç, pound ve piksel olarak da ayarlayabilir.
Kutools for Excel, ile daha fazla 300 kullanışlı fonksiyonlar, işlerinizi daha kolay hale getirir. | ||
Kurduktan sonra Kutools for Excel, lütfen aşağıdaki işlemleri yapın:(Şimdi Excel için Kutools'u Ücretsiz İndirin!)
1. Santimetre cinsinden ayarlamak istediğiniz hücreleri vurgulayın.
2. tık Kutools > Format > Adjust Cell Size, ekran görüntüsüne bakın:
3. içinde Adjust Cell Size iletişim kutusunu seçin. Unit type ihtiyacınız var ve belirtin Row height ve Column width itibaren Set values Bölüm. Ekran görüntüsüne bakın:
4. Sonra tıklayın OK or Tamam. 2 cm satır yüksekliği ve 3 cm sütun genişliği olan hücreler elde edeceksiniz.
Kutools for Excel ile hücre boyutunu cm (santimetre) olarak ayarlayın
Kutools for Excel: Excel'de sahip olmanız gereken 300 + işlevler, Buradan 30 günlük ücretsiz deneme. |
İlgili yazılar:
Bir aralık için sütun genişliğini ve satır yüksekliğini ayarlama
Excel'de birden çok hücrenin karelenmesi nasıl yapılır?
En İyi Ofis Üretkenlik Araçları
Kutools for Excel ile Excel Becerilerinizi Güçlendirin ve Daha Önce Hiç Olmadığı Gibi Verimliliği Deneyimleyin. Kutools for Excel, Üretkenliği Artırmak ve Zamandan Tasarruf Etmek için 300'den Fazla Gelişmiş Özellik Sunar. En Çok İhtiyacınız Olan Özelliği Almak İçin Buraya Tıklayın...
Office Tab, Office'e Sekmeli Arayüz Getirir ve İşinizi Çok Daha Kolay Hale Getirir
- Word, Excel, PowerPoint'te sekmeli düzenlemeyi ve okumayı etkinleştirin, Publisher, Access, Visio ve Project.
- Yeni pencereler yerine aynı pencerenin yeni sekmelerinde birden çok belge açın ve oluşturun.
- Üretkenliğinizi% 50 artırır ve her gün sizin için yüzlerce fare tıklamasını azaltır!