行の高さと列幅を任意の値で設定する。
VBAで行の高さを設定するには、RowHeightプロパティを利用して対象セルの高さをポイントで設定します。
行の高さを範囲で設定した場合は各行の高さが指定した高さになります。
列幅も同様にColumnWidthプロパティを利用して設定します。
●行の高さを設定
'******************************************************************
' 行の高さを設定
'******************************************************************
Sub setRowHeight()
'1行目の高さを設定
Sheets("Sheet1").Rows(1).RowHeight = 50
'3~5行目の高さを設定
Sheets("Sheet1").Rows("3:5").RowHeight = 8
End Sub■実行結果

●列幅を設定
'******************************************************************
' 列幅を設定
'******************************************************************
Sub setColumnWidth()
'A列の幅を設定
Sheets("Sheet1").Columns("A").ColumnWidth = 5.25
'C~E列の幅を設定
Sheets("Sheet1").Columns("C:E").ColumnWidth = 20
End Sub■実行結果



