2017年7月3日

【Excel】セルの高さや幅を設定するマクロ


セルの高さや幅を設定するマクロです。

高さ

高さを設定するには、RowHeightプロパティを使って設定します。
1
2
3
4
5
Sub SetRowHeight()
 
    Rows(3).RowHeight = 40
 
End Sub

実行結果

高さを40に設定しましたが、結果は39.75です。ぴったりには出来ないみたいです。


セルの幅を設定するには、ColumnWidthプロパティを使って設定します。
1
2
3
4
5
Sub SetColumnWidth()
 
    Columns("B").ColumnWidth = 20
     
End Sub

実行結果

こちらはぴったり20になっています。


自動調整

セルに入力されている内容に合わせて高さや幅を自動調整するには、AutoFitメソッドを使います。


たとえば、セルB3にこのように文字が入力されていたとします。このセルの高さを自動調整するには、次のように記述します。
1
2
3
4
5
Sub SetAutoFit()
 
    Rows(3).AutoFit
     
End Sub

実行結果





スポンサーリンク



Follow Me on Pinterest
Clip to Evernote