シートの表示・非表示を切り替える
シートの表示・非表示を切り替える構文は次のとおりです。
'シートを表示する
Sheets("シート名").Visible = True
'シートを非表示にする
Sheets("シート名").Visible = False
'例
Sheets("Sheet2").Visible = True '表示
Sheets("Sheet2").Visible = False '非表示
すべてのシートを表示するには次の文を使用します。
Dim i As Long
For i = 1 To Sheets.count
'ループしてすべてのシートを表示する
Sheets(i).Visible = True
Next i