SOS!! Error message in Excel 2000 - can't find project or library?

[dschomburg]

This code works fine on my PC with Excel 2000 and USED to work on others PC, but as of today it stopped working on the other PC's (also with XL2000) and produced this "Can't find Project or Library"

Sheets("EscalationMain&quot.Select
ActiveSheet.Copy Before:=Worksheets("EscalationMain&quot

ActiveSheet.Name = Format(Now, "MMDDYYhhmmss&quot


The error occurs and breaks on the ActiveSheet.Name line.


Basically all that it does is copy the Sheet called 'EscalationMain' and names the new sheet whatever the current date and time is. ...Oh yeah, it breaks on the word 'Format'.

Thanks in advance,
Dave

 

[RobBroekhuis]

Strange. First split the line in two, to see where the error occurs:

sSheet=Format(Now, "MMDDYYhhmmss&quot
activesheet.name=sSheet

That will help narrow down the problem.
Rob

 

[dschomburg]

Rob,

The break still occurs with 'Format' in highlights.

 

[RobBroekhuis]

Okay, what happens if you precede the line with format with a simple

msgbox now

(to see if it's the now or the format that's causing the problem)
Rob

 

[dschomburg]

I'm sorry, but I don't understand the relevance of your suggestion.

 

[nickjar2]

i have had similar problems b4 in Access using the Date() function. If u goto a code window, then Tools and References, you may find a MISSING reference. If so, uncheck it. Nick (Everton Rool OK!)

 

[RobBroekhuis]

You have a line of code with a problem. VB isn't very good at telling you exactly WHERE in the line of code the problem is, so it often helps to split the line out until you find exactly where the error occurs.
Rob

 

[dschomburg]

NickJar2

Thanks. As It turns out that was the exact issue.
There was a reference in it for a Crescent Form ?? or something like that. How goofy.
But Everything is groovy.

Thanks again,
Dave