OfficeType

VBA~列の幅を自動調整しよう~Excel

VBAで列の幅を自動調整する方法を解説します。

列の幅の自動調整

列の幅を自動調整したい場合はRange.AutoFitメソッドで設定できます。

下のコードを実行すると列Aから列Hの幅が自動で調整されます。

Sub test1()

Columns("A:H").AutoFit

End Sub

image-01

image-02

指定したシートの列の幅の自動調整

シートを指定するときはWorksheets("シート名")で指定できます。

下のコードを実行するとSheet2の列Aから列Hの幅が自動で調整されます。

Sub test2()

Worksheets("Sheet2").Columns("A:H").AutoFit

End Sub

image-03

image-04

ブックを指定して色を設定

ブックを指定するときはWorkbooks("ブック名")で指定できます。

Book1.xlsxというブックが開いた状態で下のコードを実行するとBook1.xlsxのSheet1の列Aから列Hの幅が自動で調整されます。

Sub test3()

Workbooks("Book1.xlsx").Worksheets("Sheet1").Columns("A:H").AutoFit

End Sub