ワークシートの非表示・再表示(Visible プロパティ)
ワークシートの表示・非表示
ワークシートを非表示にしたり、非表示にしたワークシートを再度表示させるには、Visible プロパティ を設定します。
object.Visible = boolean
引数・戻り値
- object ・・・ 対象となる Worksheet オブジェクト を指定します。
- boolean ・・・ False を指定すると object で指定したワークシートを非表示にします。True に指定すると object で指定したワークシートが非表示になっている場合、再表示します。
ブックにシートが1つしかない場合、そのシートを非表示にしようとするとエラーが発生します。
XlSheetVisibility 列挙型 を指定する
引数 boolean には、XlSheetVisibility 列挙型 の定数を指定することもできます。
| 定数 | 値 | 内容 |
| xlSheetVeryHidden | 2 | ワークシートを非表示(VBE プロパティウインドウ または、マクロで、Visible プロパティ の設定を変更する以外、再表示することはできません)Excel で、再表示不可 |
| xlSheetHidden | 0 | ワークシートを非表示(False と同じ)Excel で、再表示可能 |
| xlSheetVisible | -1 | ワークシートを再表示(True と同じ) |
Visible プロパティ 使用例
サンプルVBAソース 1
|
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
|
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 実行後
関連記事
-
-
印刷品質を設定(PageSetup.PrintQuality プロパティ)
PageSetup.PrintQuality プロパティ PageSetup.P …
-
-
シートが保護されているか確認(ProtectContents プロパティ)
ProtectContents プロパティ ワークシートが保護されているかどうか …
-
-
ウィンドウの位置を入れ替える(ActivatePrevious メソッド、ActivateNext メソッド)
ウィンドウの位置を入れ替える ActivatePrevious メソッド、Act …
-
-
計算精度を設定する(PrecisionAsDisplayed プロパティ)
PrecisionAsDisplayed プロパティ PrecisionAsDi …
-
-
シート見出しの表示・非表示(DisplayWorkbookTabs プロパティ)
シート見出しの表示・非表示(DisplayWorkbookTabs プロパティ) …
-
-
印刷設定(ページごとに異なるヘッダー・フッターを設定)Page オブジェクト・HeaderFooter オブジェクト
Page オブジェクト ページごとに異なるヘッダーおよびフッターを設定する場合、 …
-
-
スクロールバーの表示・非表示(DisplayHorizontalScrollBar,DisplayVerticalScrollBar)
スクロールバーの表示・非表示の設定 Windows オブジェクト の Displ …
-
-
保存時にバックアップファイルが作成されるかどうかを確認(CreateBackup プロパティ)
バックアップファイルが作成されるかどうかを確認 CreateBackup プロパ …
-
-
表示されているセル範囲を取得(VisibleRange プロパティ)
VisibleRange プロパティ 現在表示されているセル範囲(Range オ …
-
-
並べて比較(CompareSideBySideWith,SyncScrollingSideBySide,BreakSideBySide)
並べて比較(CompareSideBySideWith メソッド) Compar …


