วิธีการแสดงแผ่นงานในช่วงเวลาที่กำหนดของวัน?

ฉันต้องการซ่อนแผ่นงานตลอดทั้งวันยกเว้นเวลาที่กำหนด

มีมาโครอย่างนี้ในเน็ต

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

และมันก็เกี่ยวกับการให้ฉลากกับเซลล์

แต่ฉันต้องการให้มันใช้กับทั้งแผ่น และเป็นรหัสวัตถุแผ่น!

สมุดงานของฉันเปิดตลอดทั้งวันและพักเที่ยง ฉันกำลังเรียกใช้อัปเดตล่าสุดของ Microsoft Excel 2016 บน Windows

ขอบคุณสำหรับความช่วยเหลือของคุณ!

microsoft-excel

— Fantasy Hero
แหล่งที่มา

ยินดีต้อนรับสู่ superuser เวิร์กบุ๊ก Excel ของคุณ (ไฟล์. xlsx) เปิดตลอดทั้งวันหรือไม่ ถ้าใช่แมโคร VBA อย่างที่คุณต้องการสามารถทำงานได้ หากเวิร์กบุ๊กของคุณไม่เปิดตลอดเวลาเราต้องพูดถึงตัวเลือกอื่น ๆ เพื่อเริ่มเวิร์กบุ๊กของคุณในเวลาที่กำหนด ที่นี่สคริปต์ Powershell สามารถใช้งานได้ นอกจากนี้มันสามารถรัน / รันโค้ด VBA แต่ก่อนที่ใครบางคนโพสต์คำตอบโปรดเป็นคนใจดีและแก้ไขคำตอบของคุณและรวมถึงรายละเอียดเพิ่มเติมเกี่ยวกับระบบคำถามเริ่มต้นของฉัน

— nixda

@nixda ใช่มันเปิดตลอดทั้งวันโดยมีเวลาพักเที่ยง

— Fantasy Hero

@nixda อัปเดตคำถาม

— Fantasy Hero

คุณต้องสร้างมาโครที่แสดงแล้วซ่อนชีต:

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

— Máté Juhász
แหล่งที่มา

ฉันควรคัดลอก Auto_Run () ที่ไหน

— Fantasy Hero