View Single Post
  #5   Report Post  
Posted to microsoft.public.excel.programming
Ed Ed is offline
external usenet poster
 
Posts: 399
Default Count only Mon-Thurs?

Merjet:

I've never used a UDF before. I thinking I would name a range OrderDate and
put a date in it, then in the Due Date column put the formula
=DueDate(OrderDate)"? Did I come close?

Ed

"merjet" wrote in message
ups.com...
How about a user-defined function?

Public Function DueDate(OrderDate As Date, WorkdaysLater As Integer)
As Date
Dim iCt As Integer
Dim iCt2 As Integer
Do
iCt = iCt + 1
If Weekday(OrderDate + iCt) 1 And _
Weekday(OrderDate + iCt) < 6 Then iCt2 = iCt2 + 1
Loop Until iCt2 = WorkdaysLater
DueDate = Format(OrderDate + iCt, "m/d/yy")
End Function

Hth,
Merjet