列幅は、ColumnWidth と CentimetersToPoints を使います。 行高さは、RowHeight と CentimetersToPoints を使います。 CentimetersToPointsメソッドは、センチメートルをポイントに変換します。 1ポイントは、0.35mmです。 ※.ここで行った結果を印刷すると、設定したセンチメートルサイズにならない場合があります。 これは、使用しているディスプレイやプリンタによって変化する為です。 正確なサイズで印刷する場合は、使用しているパソコンの環境に合わせ補正する必要があります。 関連する「Excel VBAで印刷する余白の設定をする:ポイントとセンチ」も掲載していますので、参考にしてください。 |
E7セルを横3Cm、縦2Cmにしています。
Sub ボタン1_Click()
'列幅を3cmにする
Range("E7").ColumnWidth = Application.CentimetersToPoints(3) * (Range("E7").ColumnWidth / Range("E7").Width)
'行高さを2cmにする
Range("E7").RowHeight = Application.CentimetersToPoints(2)
End Sub
■■■
このサイトの内容を利用して発生した、いかなる問題にも一切責任は負いませんのでご了承下さい
■■■
当ホームページに掲載されているあらゆる内容の無許可転載・転用を禁止します