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 を使っています。コメントデータの処理方法の詳細はこちらをご覧ください。

関連記事

: WorksheetView オブジェクト

WorkSheetView オブジェクト行列番号や枠線の表示・非表示の設定など …

: アウトライン記号の表示・非表示（DisplayOutline プロパティ）

アウトライン記号の表示・非表示（DisplayOutline プロパティ） Di …

: 簡易印刷（PageSetup.Draft プロパティ）

PageSetup.Draft プロパティ PageSetup.Draft プロ …

: スクロール（LargeScroll メソッド、Smallscroll メソッド）

ワークシートをスクロールするワークシートをスクロールするには、LargeScr …

: ウィンドウの分割（Split プロパティ,SplitColumn プロパティ,SplitRow プロパティ）

ウィンドウの分割と解除ウィンドウ（ワークシート画面）を分割するには、Split …

: ブックが共有モードか確認する（MultiUserEditing プロパティ）

ブックが共有モードか確認する（MultiUserEditing プロパティ）共 …

: アクティブプリンタを変更（ActivePrinter プロパティ）

ActivePrinter プロパティ ActivePrinter プロパティを …

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

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

: PDF または XPS 形式で出力（ExportAsFixedFormat メソッド）

ExportAsFixedFormat メソッドブックやシートの内容を PDF …

: 分割したウィンドウの取得（Panes コレクション,Pane オブジェクト）

分割したウィンドウ「ウィンドウ枠の固定」や「ウィンドウの分割」での、すべての領 …

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