20-非表示シート一気に表示!(エクセルマクロ)
非表示のシートを全て表示させる
皆さんこんにちは!
今回はエクセルシートを一度に複数表示させるマクロをご紹介します。
非表示にするのはシートを複数選択して非表示にできますが、マクロなしで複数のシートを表示させたいときには「1シート選択して表示」という作業を複数回行わなければいけませんからね。
◆動画で勉強<マクロルーティン25>
◆イメージ
◆書くコード
◆解説
②Dim mysheet As Worksheet
①For Each mysheet In Worksheets
③mysheet.Visible = True
①Next
ーーーーーーーーーーーーーーーーーーーーーー
①For Each mysheet In Worksheets
(処理するコード)
①Next
全シート(Worksheets)の中 ( In ) からひとつづつ取得して繰り返し処理する書き方です。
For Each[変数]In[変数を含む集まり ]
Worksheetsの中の一つを mysheet(変数) としているので、mysheet は Worksheetですね。mysheetがWorksheetオブジェクトであることを宣言します
➡ ②Dim mysheet As Worksheet
★参照記事<19-貼り付け先のファイル開いてる?[解説]>
(開いている全てのブックを取得する際もFor Eachを使います。)
◆シートの表示・非表示
③mysheet.Visible = True
表示↓
[シートオブジェクト].Visible = True
非表示↓
[シートオブジェクト].Visible = False
★このマクロをボタンに登録しておけばワンクリックで便利にシート全表示できるようになります。
画像参照先<1-ファイルを開く>
今回は以上です!
とっても便利ですので作ってみてくださいね。