[ExcelVBA]非表示のシートをすべて再表示する

マクロでExcelの非表示シートをまとめて再表示するサンプルコード

Excelで非表示になっている複数のワークシートをすべてを再表示させるサンプルコードです。

手動では1つのシートずつでしか再表示ができないため、非表示になっているシートが多いほど、再表示に時間がかかります。
一括でまとめて再表示したい時はExcel VBAでやる必要があります。
（手動でのExcel操作はこちら）

非表示シートを一気に再表示する

以下の内容をコードに入力し、F5キーで実行してみます。

1Sub シートをまとめて再表示()
2    Dim ws As Worksheet
3    For Each ws In Worksheets
4        ws.Visible = True
5    Next
6End Sub

上記のコードをマクロウィンドにコピペし実行すると、非表示になっているシートが一括で表示されます。

イミディエイトウィンドウで実行（マクロを保存せずに実行する方法）

イミディエイトウィンドウから実行してすべてのシートを再表示することもできます。

1for each ws in sheets:ws.visible=true:next

イミディエイトウィンドウでの実行は、マクロを保存する必要がなく、一時的に実行したい場合に便利です。