Macro to open a file
Great thanks
"Dave Peterson" wrote:
Are you looking in that folder for the file named PhoneBook.xls?
Dim PBWkbk as workbook
Dim PBName as string
PBName = "phonebook.xls"
set pbwkbk = nothing
on error resume next
set pbwkbk = workbooks.open(filename:=thisworkbook.path & "\" & pbname
on error goto 0
if pbwkbk is nothing then
msgbox pbname & " wasn't found in " & thisworkbook.path
else
msgbox "It opened!
end if
jackrobyn1 wrote:
I have a simple macro in a workbook named "daily info" that activates when i
click a button, the macro opens a workbook called "Phonebook" both of these
workbooks are contained in the same folder called "my reports". What i need
is a macro that will look inside the folder called "my reports" even if i
move this folder to another place on my computer. In effect only looking
inside the immediate folder. I hope this makes sense.
Thanks for any help
--
Dave Peterson
|