☰

特定の時間にシートを表示するにはどうすればよいですか?

tag-icon • tag-icon microsoft-excel
特定の時間にシートを表示するにはどうすればよいですか?

特定の時間を除いて、シートを一日中非表示にしたいです。

ネット上にはこのようなマクロがあります

Sub Auto_Open()
  Application.OnTime TimeValue("17:00"), "HideRows"
  Application.OnTime TimeValue("09:00"), "RevealRows"
End Sub

そしてそれは細胞にラベルを付けることです

しかし、それをシート全体に適用し、シート オブジェクト コードにしたいのです。

私のワークブックは一日中開いていて、正午に休憩します。Windows で Microsoft Excel 2016 の最新の更新プログラムを実行しています。

ご協力ありがとうございました！

答え1

シートを表示したり非表示にするマクロを作成する必要があります。

Sub ShowSheet()
    WorkSheets("SheetName").Visible = xlSheetVisible
End Sub

Sub HideSheet()
    WorkSheets("SheetName").Visible = xlSheetHidden
End Sub

メインサブは次のようになります:

Sub Auto_Run()
    Application.OnTime TimeValue("15:00"), "ShowSheet"
    Application.OnTime TimeValue("15:30"), "HideSheet"
End Sub

関連情報