View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Hennie Neuhoff Hennie Neuhoff is offline
external usenet poster
 
Posts: 57
Default Open workbook selected form dialog

Hi All,
Below is my code to get the workbook selected by the user. For some or other
reason this dummy
can't get the code to open the selected file. I would like to substitute the
msgbox with the code to
open the file. Any advice would be appreciated.
Thanks in advance



Sub GetFileExample()
Dim fNameAndPath As Variant
fNameAndPath = Application.GetOpenFilename _
(FileFilter:="Excel Files (*.XLS), *.XLS", _
Title:="Select File To Be Opened")
If fNameAndPath = False Then _
Exit Sub
MsgBox fNameAndPath

End Sub

--
HJN