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

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

PR

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」を指定することで、表示にできます。

PR

実行結果

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

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

参考①

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

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

PR

参考②

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

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


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

タイトルとURLをコピーしました