1.  » 
  2.  » 
  3.  » 
  4. ワークシートの非表示/再表示を設定する

エクセル2013基本講座：ワークシートの非表示/再表示を設定する



ワークシートを非表示にする 非表示のワークシートを再表示する
ワークシートの再表示ができない?  

ワークシートを非表示にする　　　　　topへ

非表示のワークシートを再表示する　　　　　topへ

シートの再表示ができない?　　　　topへ

  1. ブックが保護されているケース

    • ブックを保護する操作手順
      1. 非表示にしたいシートを上記の操作で非表示にします。
        ここではSheet1〜5の5枚のシートのうち、Sheet2とSheet3を非表示にしています。
      2. [校閲]タブの[ブックの保護]を実行します。
        「シート構成」にチェックを入れます。
        パスワードを入力します。入力を省略することもできます。
      3. パスワードの確認が表示されますので、入力したパスワードを入力します。
      4. シート見出しを右クリックしても[再表示]がグレー表示で、操作ができなくなりました。
      5. シートの選択を表示しても、非表示のシートは一覧に表示されませんので表示することができません。
    • ブックの保護を解除する操作手順
      1. [校閲]タブの[ブックの保護]を実行します。
        設定したパスワードを入力します。
      2. シート見出しを右クリックして、[再表示]を実行できるようになりました。

  2. VBAで非表示の設定にする

    • 非表示に設定する操作手順
      1. Sheet1〜6を準備したファイルを使って、下記のコードでSheet2〜4を非表示にしてみます。
        Sub test1()
        　　ThisWorkbook.Sheets("Sheet2").Visible = False
        　　ThisWorkbook.Sheets("Sheet3").Visible = xlSheetHidden
        　　ThisWorkbook.Sheets("Sheet4").Visible = xlSheetVeryHidden
        End Sub
      2. シート見出しを右クリックして[再表示]を実行します。
        Sheet2〜4は非表示になっているのですが、Sheet2とSheet3だけが再表示に表示されています。
        つまり、Sheet2と3の非表示の方法では一般操作で再表示ができることが分かります。
        Sheet4は「.Visible = xlSheetVeryHidden」で非表示にしているので、この方法では再表示できません。
        一般操作では再表示することができませんので、以下のVBAで再表示することになります。
    • 再表示する設定手順
      1. このようなシート含むケースで、すべてのシートを再表示するには以下のようなVBAで再表示ができます。
        Sub test2()
        　　Dim Sh As Object

        　　For Each Sh In ActiveWorkbook.Sheets
        　　　　Sh.Visible = True
        　　Next Sh

        End Sub
      2. Sheet4も再表示できました。

よねさんのExcelとWordの使い方｜エクセル2013基本講座｜シートの操作｜ワークシートの非表示/再表示を設定する