CHDIR vba

[daveyc18]

CHDir Path

the path is definitely correct...when I do ?path and copy and paste the path to an explorer window, the path opens up

however, when I run the macro to open a file in the path, it opens "My Documents"

this is the code after Chdir path

filetoopen = Application.GetOpenFilename("Excel Files (*.xls*), *.xls*")

 

[Jeffrey Mahoney]

How are you loading Path? I loaded it this way

Sub OpenFileFromPath()
  Dim Path As String
  Dim FileToOpen As Variant
  
  Path = ThisWorkbook.Path
  Debug.Print Path
  
  ChDir Path
  
  FileToOpen = Application.GetOpenFilename("Excel Files (*.xls*), *.xls*")
  
End Sub

 

[RoryA]

ChDir only works if your current directory is on the same drive. If not, you need ChDrive to change the relevant drive first.