エクセル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基本講座シートの操作|ワークシートの非表示/再表示を設定する