Excel宏可识别今天的哪一天

THA*_*bie 4 excel vba excel-vba

我想创建一个宏,它将查看今天的哪一天(星期一,星期二,星期三等),如果这一天是星期六或星期日,那么宏将停止一切,但如果它是工作日(M,T,W,Th或F)然后它将调用下一个Sub.

Private Sub Workbook_Open()
    **If today is Saturday or Sunday Then**
        **do nothing**
        Else
        Call Populate_Workbook()
      End If
End Sub
Run Code Online (Sandbox Code Playgroud)

带**的零件是我需要帮助搞清楚的零件.如果有人最终搞清楚这一点,你能解释一下你是如何想出解决方案的吗?尝试更多地学习和理解宏.

Exc*_*ero 8

干得好...

Private Sub Workbook_Open()
    If Weekday(Date, vbMonday) < 6 Then Populate_Workbook
End Sub
Run Code Online (Sandbox Code Playgroud)

Weekday()函数有一个可选的第二个参数,告诉它一周的哪一天开始.Weekday()函数返回1到7之间的整数.

我已经指示它在星期一开始这一周,所以星期六将是6,SUNDAY将是7.