EXCEL VBAで非表示シート名を一括表示させる方法を教えてください！
こんな悩みに回答します。
非表示にできる< 目次 >
こんな悩みの人向け
こんな悩みの人向け
- EXCELの非表示シートを一括で全て表示させたい人
理由は いろいろとあると思います。
例えば、いつの間にかEXCELのシート数が膨大な数となっていて、整理したいケースなど。
1つ1つ 右クリックで「再表示」→「シート名を選択」なんて、3シートくらいで飽きてしまいます。
正直 かなりめんどくさいので、VBAを使って ちゃちゃっと再表示させちゃいましょう。
基本的にコピペでOKです。VBAの使い方が分からない人は、この辺の記事をどうぞ。
Nakamura
-
-
【説明】VBEで作成したVBAコードの実行方法【EXCEL VBA】
続きを見る
-
-
【解説付】マクロ・VBE・VBAの違いの説明【EXCEL VBA】
続きを見る
はい。
ということで、説明しますね。
コードの紹介（結論）※コピペでOK
コードは至ってシンプルであり、以下の通りです。
|
1 2 3 4 5 6 |
Sub シート一括再表示() Dim sheets As Worksheet For Each sheets In Worksheets sheets.Visible = True Next End Sub |
重要なポイント
強いて重要なポイントをあげるとしたら、シートを再表示させたいEXCELの VBE上で記載してください。
参考までに、実行画面のキャプチャも紹介しておきますね。
Nakamura
コピペしたコードは、Sub～EndSub内を一度クリックして、対象Subを選択した後に、キーボードのF5を押せば実行できますよー。
Nakamura
終わりに
お疲れさまでした。
紹介したコードは 意外とシンプルだったので、「こんなもんかー」と思った人が多いかもしれません。
でも、知らないと意外と感動しますね。個人的には、For Each文の理解が深まったりするので、結構好きなコードだったりします。
Nakamura
この辺は コピペして使えれば、全然事足りるので、暗記は不要ですよー。
ということで、今回はここまでとなります。
NakamuraBlogは、個人的なノウハウのナレッジ保管場所となっていますが、
EXCELに纏わるニッチな情報も（たまに）発信してたりしてますので、
もしよろしければ またいらしてくださいませ。
Twitterもフォローしてくださると筆者としては嬉しいです。
はい。ということで、本当にここまでとなります。
ここまでご覧いただき、ありがとうございました。
終わり。