【VBA道場】#42 選択範囲の列幅を自動調整

問題

列の幅をA3～A14の文字列に合わせて自動調整してください。

完成見本

解答

Sub vba_doujyou_42()

　'A3～A14の幅に合わせて列を自動調整する
　 Range("A3:A14").Columns.AutoFit

End Sub

サンプルファイル（マクロ無）

VBA道場42 サンプルファイル（マクロ無）

1 ファイル 8.31 KB

ダウンロード

サンプルファイル（マクロ有）

VBA道場42 サンプルファイル（マクロ有）

1 ファイル 12.90 KB

ダウンロード

解説

セル名.Columns.AutoFit：セル範囲に合わせて列幅を自動調整

今回は、セルに合わせて列の幅を自動調整する方法を学習します。
Excelで列幅を自動調整するには、列見出しの境界をダブルクリックします。

この操作をVBAで実現するのがAutoFitメソッドです。

そして、Excelにはもう１つ、「選択範囲の列幅を自動調整する」という機能があります。

今回のように、A1のセルに長いタイトルが入っていた場合、A列を自動調整するとタイトルに合わせた幅になってしまいます。

これを防ぐために、自動調整したいセルの範囲内の列に対してAutoFitメソッドを使います。

では、コードを見ていきましょう。

'A3～A14の幅に合わせて列を自動調整する
Range("A3:A14").Columns.AutoFit

今回は、A3～A14のセルの幅に合わせて列を自動調整したいので、上記のように記述しました。
これにより、1行目のタイトルではなく、、A3～A14のセルの幅に合わせて列が自動調整されます。

おわりに

今回は、特定のセルに対して列幅を自動調整するVBAを見ていきました。
Excelでの書式整形はよく使いますので、しっかりと覚えておきましょう。

本日はここまで！

おすすめ参考書

Amazon

たった1秒で仕事が片付くExcel自動化の教科書

いちばんやさしいExcelVBAの教本

ExcelVBA逆引き辞典　パーフェクト

楽天

いちばんやさしいExcelVBA

いちばんやさしいExcel　VBAの教本　人気講師が教える実務に役立つマクロの始め方／伊藤潔人【1000円以上送料無料】 価格：2420円（税込、送料無料) (2021/4/22時点) 楽天で購入

すらすら読めるExcelVBA

スラスラ読めるExcel　VBAふりがなプログラミング [ リブロワークス ] 価格：2035円（税込、送料無料) (2021/4/22時点) 楽天で購入

VBA逆引き大辞典

Excel　VBA逆引き辞典パーフェクト第3版 [ 田中亨 ] 価格：2838円（税込、送料無料) (2021/4/22時点) 楽天で購入