View Single Post
  #5   Report Post  
Posted to microsoft.public.excel.programming
Tom Ogilvy Tom Ogilvy is offline
external usenet poster
 
Posts: 27,285
Default Open existing workbook

Not real clear on your situation, but to show the file Open dialog

Dim fName as Variant
chDrive "C"
chDir "C:\MyFolder"
fName = Application.GetOpenFileName()
if fName < False then
workbooks.open fName
End if

The dialog returns the name and path of the file chosen - it doesn't open
it. So you have to open it with workbooks.Open.

--
Regards,
Tom Ogilvy



"Daniel Van Eygen" wrote in message
i.nl...
Hi all experts,
I have a set (3) of workbooks that open from a shortcut on the desktop.

When
the workbooks are open I want to give the user the possibility to open an
already existing workbook to replace one of the open workbooks (the one on
the button to open an existing book) and leave the 2 other workbooks that
are already open. So the user needs to see a windows file list to choose
from, select a file and than the macro should run further.
I have no idea on how to start on this.
Thanks for any valued help.
Daniel