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

関連記事

: 計算精度を設定する（PrecisionAsDisplayed プロパティ）

PrecisionAsDisplayed プロパティ PrecisionAsDi …

: ウィンドウを整列（Windows.Arrange メソッド）

ウィンドウを整列（Windows.Arrange メソッド） Windows コ …

: ブックの表示を変更（View プロパティ）

ブックの表示を変更（View プロパティ） View プロパティで、ブックの表 …

: 印刷：余白を設定 TopMargin,BottomMargin,LeftMargin,RightMargin,HeaderMargin,FooterMargin

余白を設定する余白を設定する単位は、pt（ポイント：約 0.03528 cm） …

: 印刷のページ区切り（DisplayPageBreaks プロパティ）

DisplayPageBreaks プロパティ印刷したあとや印刷プレビューを表 …

: ワークシートのコピー・移動（Copy メソッド Move メソッド）

Copy メソッド Copy メソッドで、指定した位置にワークシートの複製を作成 …

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

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

: ワークブックを保護・保護を解除（Protect メソッド・Unprotect メソッド）

Protect メソッド・Unprotect メソッド Protect メソッド …

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

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

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

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

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