Как показать лист в определенное время суток?

Как показать лист в определенное время суток?

Я хочу, чтобы лист был скрыт весь день, за исключением определенного времени.

В сети есть такой маркрос

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

И речь идет о присвоении клеткам меток.

Но я хочу, чтобы он применялся ко всему листу и был кодом объекта листа!

Моя рабочая тетрадь открыта весь день, с перерывом в полдень. Я использую последнее обновление Microsoft Excel 2016 на Windows.

Спасибо за вашу помощь!

решение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

Связанный контент