Weekday function into VBA

**Libster78** · 03-09-2010, 06:29 AM

Hi there

I need this function

=A1+60+7-WEEKDAY(A1+60+1)

into a macro

Its the weekday section that I can'[t get.

I've got

Private Sub DetermineDeadline()
With ws1.Cells("H6") + 60 + 7 - Weekday
ws1.Cells ("H6") + 60 + 1
End Sub

Thank you

**JeanRage** · 03-09-2010, 06:51 AM

Hi,

Have you tried ...

Application.WorksheetFunction.Weekday

HTH

**Libster78** · 03-09-2010, 07:05 AM

No, forgice me as I am very new to this. I'm not sure how to add that in or where. I need to to return in column I - the date in col H plus 60 days and then the nearest friday to that date.

How do add this in?

Forgive me for being a complete novice.