Undefined Function error

[Maclain]

Hi All,

I'm using this function:

Public Function WorkingDay(StartDate As Date, NumberOfDays As Integer) As Date
    WorkingDay = Excel.WorksheetFunction.WorkDay(StartDate, NumberOfDays)
End Function

To find x number of working days from a date entered.

I need this in a few places, one of with is an update query.

I have a field which has the following expression:

Expr2: WorkingDay([Date Rec],5)

as this will only be run on the received day i have also tried:

Expr2: WorkingDay(Now(),5)

Both expressions return an error: Undefined Function 'WorkingDay' in expression.

Any ideas?

 

[Maclain]

Looks like i have two functions with the same name.