Làm thế nào để hiển thị một tờ tại một thời điểm tuyệt vời trong ngày?

Tôi muốn tờ này được ẩn cả ngày trừ một thời gian cụ thể.

Có một marcro như thế này trên mạng

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

Và đó là về việc đưa nhãn cho các tế bào

Nhưng tôi muốn nó áp dụng cho toàn bộ trang tính và là một mã đối tượng trang tính!

Sổ làm việc của tôi mở cửa cả ngày, nghỉ giữa trưa. Tôi đang chạy bản cập nhật mới nhất của Microsoft Excel 2016 trên Windows.

Cảm ơn sự giúp đỡ của bạn!

microsoft-excel

— Anh hùng ảo
nguồn

Chào mừng bạn đến với siêu người dùng. Sổ làm việc Excel của bạn (tệp .xlsx) có mở cả ngày không? Nếu có, một macro VBA như bạn đang yêu cầu, có thể thực hiện công việc. Nếu sổ làm việc của bạn không mở tất cả thời gian, chúng tôi phải nói về các tùy chọn khác để bắt đầu sổ làm việc của bạn tại một thời điểm cụ thể. Ở đây, một kịch bản Powershell có thể được sử dụng. Ngoài ra, nó có thể thực thi / chạy mã VBA. Nhưng trước khi ai đó đăng câu trả lời, vui lòng tử tế và chỉnh sửa câu trả lời của bạn và bao gồm thêm chi tiết về hệ thống của bạn, câu hỏi ban đầu của tôi và những gì khác bạn đã thử

— nixda

@nixda Vâng, nó mở cửa cả ngày, nghỉ vào buổi trưa.

— Anh hùng tưởng tượng

@nixda Cập nhật q

— Fantasy Hero

Bạn cần tạo các macro hiển thị, sau đó ẩn các trang tính:

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

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

Phụ chính của bạn sẽ là:

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

— Máté Juhász
nguồn

Tôi nên sao chép Auto_Run () ở đâu?

— Anh hùng ảo tưởng