見出し画像

20-非表示シート一気に表示!(エクセルマクロ)

非表示のシートを全て表示させる

皆さんこんにちは!
今回はエクセルシートを一度に複数表示させるマクロをご紹介します。
非表示にするのはシートを複数選択して非表示にできますが、マクロなしで複数のシートを表示させたいときには「1シート選択して表示」という作業を複数回行わなければいけませんからね。

◆動画で勉強<マクロルーティン25

◆イメージ

画像1


◆書くコード

画像2


◆解説

②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

画像3

★参照記事<19-貼り付け先のファイル開いてる?[解説]>
(開いている全てのブックを取得する際もFor Eachを使います。)

◆シートの表示・非表示

mysheet.Visible = True

表示↓
[シートオブジェクト].Visible = True

非表示↓
[シートオブジェクト].Visible = False


★このマクロをボタンに登録しておけばワンクリックで便利にシート全表示できるようになります。

画像4

画像参照先<1-ファイルを開く


今回は以上です!
とっても便利ですので作ってみてくださいね。

◆関連動画


この記事が気に入ったらサポートをしてみませんか?