Excel（エクセル）のマクロ・ＶＢＡ・関数・操作などのメモ

ワークシートの非表示・再表示（Visible プロパティ）

2015/09/30

ワークシートの表示・非表示

ワークシートを非表示にしたり、非表示にしたワークシートを再度表示させるには、Visible プロパティ を設定します。

【書式】

object.Visible = boolean

引数・戻り値

object ・・・対象となる Worksheet オブジェクト を指定します。
boolean ・・・ False を指定すると object で指定したワークシートを非表示にします。True に指定すると object で指定したワークシートが非表示になっている場合、再表示します。

ブックにシートが１つしかない場合、そのシートを非表示にしようとするとエラーが発生します。

XlSheetVisibility 列挙型 を指定する
引数 boolean には、XlSheetVisibility 列挙型 の定数を指定することもできます。

定数	値	内容
xlSheetVeryHidden	2	ワークシートを非表示（VBE プロパティウインドウまたは、マクロで、Visible プロパティの設定を変更する以外、再表示することはできません）Excel で、再表示不可
xlSheetHidden	0	ワークシートを非表示（False と同じ）Excel で、再表示可能
xlSheetVisible	-1	ワークシートを再表示（True と同じ）

Visible プロパティ使用例

サンプルVBAソース 1

　
Sub Sample_SheetVisible1()
        
    '「Sheet3」を非表示（Excel から再表示はできない）
    Dim w As Worksheet
    Set w = Worksheets("Sheet3")
        
    w.Visible = xlSheetVeryHidden


End Sub

1

2

3

4

5

6

7

8

9

10

11

12

　

Sub Sample_SheetVisible1()

'「Sheet3」を非表示（Excel から再表示はできない）

Dim w As Worksheet

Set w = Worksheets("Sheet3")

w.Visible = xlSheetVeryHidden

End Sub

　

サンプルVBAソース 2

　
Sub Sample_SheetVisible2()

    '現在、非表示のシートをすべて再表示する
    
    Dim w As Worksheet
    
    For Each w In Worksheets
        
        w.Visible = True
        
    Next

End Sub

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

　

Sub Sample_SheetVisible2()

'現在、非表示のシートをすべて再表示する

Dim w As Worksheet

For Each w In Worksheets

w.Visible = True

Next

End Sub

　

実行結果

サンプルVBAソース実行前

サンプルVBAソース 1 実行後

サンプルVBAソース 2 実行後

- ブック・シートの操作 VBA基本, Visible プロパティ, Worksheet オブジェクト, エクセルVBA, ブック・シートの操作

Tweet

Message コメントをキャンセル

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: ウィンドウの位置を入れ替える（ActivatePrevious メソッド、ActivateNext メソッド）

ウィンドウの位置を入れ替える ActivatePrevious メソッド、Act …

: 選択されているシートを参照する（SelectedSheets プロパティ）

SelectedSheets プロパティ選択されているすべてのシートをあらわす …

: 印刷設定を高速化（PrintCommunication プロパティ）

PrintCommunication プロパティ PrintCommunicat …

: 印刷のタイトル行、タイトル列を設定（PrintTitleRows,PrintTitleColumns）

PageSetup.PrintTitleRows プロパティ PageSetup …

: ウィンドウの状態を取得・設定（WindowState プロパティ）

ウィンドウの状態を取得・設定（WindowState プロパティ） Window …

: ワークシートの数を数える（Count プロパティ）

Count プロパティ指定したWorksheets コレクションやSheets …

: ワークシートにクリップボードの内容を貼り付ける（Paste メソッド）

Paste メソッド指定したワークシート上にクリップボードのデータを貼り付けま …

: 印刷設定（ヘッダー／フッター）書式コード・VBAコード

印刷設定（ヘッダー／フッター）書式コード・VBAコードヘッダーおよびフッター（ …

: スクロールバーの表示・非表示（DisplayHorizontalScrollBar,DisplayVerticalScrollBar）

スクロールバーの表示・非表示の設定 Windows オブジェクトの Displ …

: ブックを保存する（Save メソッド）

ブックを保存する（Save メソッド）既存のブックを上書き保存するには、Sav …

PREV: ワークシートをファイルに保存する（SaveAs メソッド）
NEXT: 印刷・印刷プレビュー（PrintOut メソッド、PrintPreview メソッド）