[Excel VBA] Use Evaluate to find NETWORKDAYS with variables

[mchilapur]

Hello all,
I am using below code to find number of NETWORKDAYS between 2 dates and both the dates are in variables.
Can anyone help me out with the mistake i am doing here.. ?
I need output as 7 but it gives as 0.

Sub trial()Dim RowDate As Date


    RowDate = Range("K7").Value    ' Value is 3-Oct-2017
    MsgBox Evaluate("NETWORKDAYS(" & RowDate & "," & Date & ")")


End Sub

 

[Eric W]

Either:

Sub trial()
Dim RowDate As Date

    RowDate = Range("K7").Value    ' Value is 3-Oct-2017
    MsgBox Evaluate("NETWORKDAYS(""" & RowDate & """,""" & Date & """)")

End Sub

or

Sub trial()
Dim RowDate As Date

    RowDate = Range("K7").Value    ' Value is 3-Oct-2017
    MsgBox WorksheetFunction.NetworkDays(RowDate, Date)

End Sub

 

[mchilapur]

Thanks Eric...Both works like a charm...

 

[Eric W]

You're welcome.