Open another WorkBook

[JB]

In excel VB for Apps how to open another workbook if the path is unknown

 

[r]

Function GetOpenFilename([FileFilter], [FilterIndex], [Title], [ButtonText],
[MultiSelect])
of Excel.Application

regards
r

Il mio ultimo lavoro ...
http://excelvba.altervista.org/blog/index.php/Excel-VBA/UsedRange-eccezioni-e-alternative.html

 

[Patrick Molloy]

you can use the GetOpenFileName() method -- read HELP on this as it is
quite useful


Dim FileToOpen As String
ChDrive "D" ' not required here. but enables you to get the dialog box
looking somewhere..

FileToOpen = Application.GetOpenFilename

 

[Jacob Skaria]

If you mean to open other workbooks from the same path of the currently
opened file use...

Workbooks.Open ActiveWorkbook.Path & "\filename.xls"

If this post helps click Yes

 

[JB]

Patrick, what I have going on is the user clicks button on the current
worksheet. The code will copy three numbers from that worksheet. Open the
other workbook (target) and pasts the data into that workbook. If the user
has moved the target workbook or has navigated away from the directory it is
in my code Workbooks.Open Filename:= "Target.xls" does not work because it
needs the path.

 

[JB]

Worked like a charm. Sometimes you cannot see the trees for the forest.