マクロでExcelの非表示シートをまとめて再表示するサンプルコード
Excelで非表示になっている複数のワークシートをすべてを再表示させるサンプルコードです。
手動では1つのシートずつでしか再表示ができないため、非表示になっているシートが多いほど、再表示に時間がかかります。
一括でまとめて再表示したい時はExcel VBAでやる必要があります。
(手動でのExcel操作はこちら)
非表示シートを一気に再表示する
以下の内容をコードに入力し、F5キーで実行してみます。
Sub シートをまとめて再表示()
Dim ws As Worksheet
For Each ws In Worksheets
ws.Visible = True
Next
End Sub
上記のコードをマクロウィンドにコピペし実行すると、非表示になっているシートが一括で表示されます。
イミディエイトウィンドウで実行(マクロを保存せずに実行する方法)
イミディエイトウィンドウから実行してすべてのシートを再表示することもできます。
- Ctrl+Gでイミディエイトウィンドウを表示する
- 以下のコードをコピペし、Enterキーで実行する
for each ws in sheets:ws.visible=true:next
イミディエイトウィンドウでの実行は、マクロを保存する必要がなく、一時的に実行したい場合に便利です。