I'm assuming it stopped on the line that includes NETWORKDAYS.

We've gone through all of this before!!

YOU MUST INSTALL THE ANALYSIS TOOL PACK. That's where the NETWORKDAYS function
is found. In the VB Editor, go to Tools/References, and check it on the list.

You say you had the function working in the past but the result was wrong.
That means you had done this before. I guess you must have pasted the new
function into a new workbook. You have to set the reference to ATP for every
workbook that contains a macro that uses its functions.

Remember also, for the holiday list, you must add 2 to each of the dates on
that list to handle the fact that your weekend days are Thu and Fri.


On Tue, 12 Oct 2004 00:34:31 -0500, Sambusa
wrote:


Thanks for ur prompt respons
I would like to tell that i used this
formula:=HoursWorked(A2;A3;TIME(7;30;0);TIME(15;3 0;0);AR3:AS3)


when i run it it's stop in this step:

Private Function GetWorkdays(Date1 As Long, Date2 As Long, _
Optional Holidays As Range = Nothing) As Long

'NB: Thursday and Friday are weekend days, so add 2 to the dates
'when calling NETWORKDAYS so the ATP function will think Thu and Fri
'are Sat and Sun, and thus not working days

If Holidays Is Nothing Then
GetWorkdays = NETWORKDAYS(Date1 + 2, Date2 + 2)
Else
GetWorkdays = NETWORKDAYS(Date1 + 2, Date2 + 2, Holidays)
End If
End Function


With this error Message: Sub or Function not defined

hope u can put the examble i gave u in excel & post it here pls



Thanks
WAITING
SAMI