サイズの単位をセンチメートルで指定する【CentimetersToPointsメソッド】【ExcelVBA】

CentimetersToPointsメソッド

Excelの表示に関する単位はポイントですが、ポイントで示されるとイメージがつきにくいですよね。
CentimetersToPointsメソッドを使えば、馴染みのあるセンチメートルをポイントに変換してくれます。
構文
expression.CentimetersToPoints(Centimeters)

サイズの変更にセンチメートル単位を使ったサンプルコード

Public Sub Sample()
    
    '行の高さを0.5センチにする
    Rows(1).RowHeight = Application.CentimetersToPoints(0.5)
   
    '列幅を5cmにする
    Columns(2).ColumnWidth = Application.CentimetersToPoints(5) _
    * (Columns(2).ColumnWidth / Columns(2).Width)

    '余白(左)を2cmにする
    ActiveSheet.PageSetup.LeftMargin = Application.CentimetersToPoints(2)
    
End Sub

注意点

• 1ptは0.35mmです。
• 列幅の単位は文字単位です。行の高さと同じように記述すると上手くいきません。
  (.ColumnWidth(文字単位) / .Width(ポイント単位))
  これで、1ポイントの文字単位が計算できるので、
  列幅をセンチメート単位で指定するときはサンプルコードのように記述してください。

関連記事

• 行、列番号を取得する【Rowプロパティ】【Columnプロパティ】