Calculating the difference between hours

S

Sambusa

Thanks for ur prompt respons
I would like to tell that i used thi
formula:=HoursWorked(A2;A3;TIME(7;30;0);TIME(15;30;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 :confused
 
M

Myrna Larson

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.
 
G

Guest

When I compile my VBA and sent it out to users, do the users have to install
the Analysis Tool Pack in their copy of the VBA project in order to use any
part of the Excel forms I created?
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top