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