Thread: CurDir
View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Tom Ogilvy Tom Ogilvy is offline
external usenet poster
 
Posts: 27,285
Default CurDir

In the workbook where you have the error - after it occurs, go into the VBE
and look in tools references (the troublesome workbook should be the active
project - selected in the project explore) and you should find one or more
references marked as MISSING.

You should remove or correct these missing references.

--
Regards,
Tom Ogilvy


"CLR" wrote in message
...
Hi All...........

I have the following code (that I don't begin to understand), which I got
here some time ago. It seems to me that it worked once, but since, my
computer has been upgraded and Office re-installed. Currently I get the
error message "Compile Error: Can't find project or library" with the

term
"CurDir" highlighted, when trying to run it.........
Help please......

Function GetFileNameMulti() As Variant
Dim myCurFolder As String
myCurFolder = CurDir
GetFileNameMulti = Application.GetOpenFilename
ChDrive myCurFolder
ChDir myCurFolder
End Function

TIA for any help
Vaya con Dios,
Chuck, CABGx3