View Single Post
  #3   Report Post  
Posted to microsoft.public.excel.programming
Valeria[_2_] Valeria[_2_] is offline
external usenet poster
 
Posts: 24
Default specify an input directory with GetOpenFilename

It works wonderfully!
Thanks a lot!
Valeria

-----Original Message-----
Give this a shot

'Load the Input Dir
InputDirectory = "C:\"

'Save the current Dir for later Clean up
CurrentDirectory = CurDir

'Change the Dir to look in
ChDir (InputDirectory)

'Load FileNameToOpen
FileNameToOpen = Application.GetOpenFilename

'Clean up
ChDir (CurrentDirectory)


HTH
-Merk

.