【VBA】複数の列を非表示にする

VBAコード

ここでは例として、
　・シート「sample」の2列目～4列目を非表示
にします。
※2列目～4列目とは「B列～D列」です。

'変数の宣言を必須
Option Explicit

Sub sample()

    Dim hiddenRangeStart As Range
    Dim hiddenRangeEnd As Range
    
    '非表示にしたい最初の列を設定
    Set hiddenRangeStart = Worksheets("sample").Columns(2)
    '非表示にしたい最後の列を設定
    Set hiddenRangeEnd = Worksheets("sample").Columns(4)
    
    '複数の列を非表示にする
    Worksheets("sample").Range(hiddenRangeStart, hiddenRangeEnd).Hidden = True

End Sub

実行結果

複数の列を非表示にできました。
※2列目～4列目(B列～D列)を非表示にできました。

参考①

複数の行を非表示にすることもできます。

詳細は以下の記事をご確認ください。

参考②

上記のVBAコードで使用した以下の詳細は、公式サイトをご確認ください。

●「Worksheetオブジェクト」の「Columns」プロパティ

●「Rangeオブジェクト」の「Hidden」プロパティ