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

この記事では
 ・複数の行を
 ・非表示にする方法
を記載します!

VBAコード

ここでは例として、
 ・シート「sample」の3行目~6行目を非表示
にします。

実行前(表示されている)
実行前(表示されている)
'変数の宣言を必須
Option Explicit

Sub sample()

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

End Sub

「非表示にしたい最初の行」を設定します(10行目)。
「非表示にしたい最後の行」を設定します(12行目)。
※「Worksheetオブジェクト」の「Rows」プロパティにより、「Rangeオブジェクト」を取得しています。

「Rangeオブジェクト」の「Hidden」プロパティに「True」を指定することで、非表示にできます(15行目)。
※「False」を指定することで、表示にできます。

実行結果

複数の行を非表示にできました。
※3行目~6行目を非表示にできました。

実行結果(3行目~6行目が非表示になった)
実行結果(3行目~6行目が非表示になった)

参考①

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

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

参考②

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

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


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