VBA第四课：剔除周末时间并计算工作日日期

本节课的主要培养能力：灵活运用自定义函数与Excel操作结合解决实际问题

外出：人天  起始日期+在客户现场工作的天数 --à工作结束日期

Step1:起始日期判断是否是工作日

Step2:

       1.判断工作日天数是否跨周末

       2.判断工作日天数是否跨月

问题场景：根据指定开始工作日期和工作日天数，计算结束的工作日日期

VBA自定义函数的编写框架

Function Test1(Num1 As String, Num2 As Integer) As String

'取得的效果相当于Return

Test1 = Num1 & Num2

Debug.Print Test1

End Function

DateYear = VBA.Year("2021-3-15")

debug.Print DateYear

 2021

学会Goto语句实现语句调用

Sub test2()

Dim i, j

i = 1

j = -3

line1:

    i = 4

    j = 5

If i + j < 0 Then

  MsgBox i + j

  GoTo line1

ElseIf i + j > 5 Then

    MsgBox i + j

End If

End Sub