スポンサーリンク

列幅を設定するマクロ

ColumnWidthプロパティで列幅を取得する

ColumnWidthプロパティを使って、列幅を自由に設定することができます。
Columnsの引数に列番号や列名を指定します。

Columns("C").ColumnWidth = 20
 ’列Cの列幅を20にします。 
Columns(3).ColumnWidth = 20
 ’列3の列幅を20にします。

サンプルコード
 コード内、Wクリックでコピーできます。
Sub サンプル2210()
      
    Columns("C").ColumnWidth = 20
    
    'Columns(3).ColumnWidth = 20
      
End Sub

Rangeプロパティで列幅を取得する

Rangeプロパティで列幅を設定するには、EntireColumn.ColumnWidthを使います。

Range("A1").EntireColumn.ColumnWidth = 20
 ’列Aの列幅を20にします。

サンプルコード
 コード内、Wクリックでコピーできます。
Sub サンプル2215()
      
    Range("A1").EntireColumn.ColumnWidth = 20
    
End Sub
スポンサーリンク

範囲を指定して列幅を設定するマクロ

Columnsプロパティ

Columns("B:D").ColumnWidth = 20
 ’列B~列Dの幅を設定

サンプルコード
 コード内、Wクリックでコピーできます。
Sub サンプル2220()
      
    Columns("B:D").ColumnWidth = 20
  
End Sub

Rangeプロパティ

Range("B:D").ColumnWidth = 20
 ’列B~列Dの幅を設定 
Range("B1,D1").ColumnWidth = 20
 ’列Bと列Dの幅を設定(カンマで区切ります)

サンプルコード
 コード内、Wクリックでコピーできます。
Sub サンプル2225()

    Range("B:D").ColumnWidth = 20
    
    'Range("B1,D1").ColumnWidth = 20
  
End Sub

以上で「列幅を設定するマクロ」の説明を終わります。




おすすめの記事