Flash drive directory access

[erutherford]

I have excel files located on a flash drive. The directory assigned letter (D for the drive changes depending on which computer I am using. This causes some code to stop working. Is there a solution that allows me to keep using the flash drive?

thanks in advance

 

[erutherford]

This might solve my problem if I can get it work.

Sub Openflashdrive()

Dim strFile As String
strFile = Application.GetOpenFilename(FileFilter:="Excel files, *.xlsm", Title:="Choose regdwnld file")

End Sub

The dialog box opens and I can select the file, it just doesn't open the file. has to be something simple.

 

[Micron]

First, I would NOT work on a file on a flash/usb drive if that's what you're doing, having experienced loss of the file due to corruption. These are meant for storage only.
Use the relative path property in your code, not C: or whatever it is you're using, or transfer the file to the same C: drive folder in every instance.

 

[erutherford]

First, I would NOT work on a file on a flash/usb drive if that's what you're doing, having experienced loss of the file due to corruption. These are meant for storage only.
Use the relative path property in your code, not C: or whatever it is you're using, or transfer the file to the same C: drive folder in every instance.

Good advice! BTW do you see anything in that code that won't allow the file to open?

 

[Micron]

That function/method only gets the name of the file to open, it doesn't open files. You could add
Workbooks.Open strFile

or use file picker as noted.

 

[erutherford]

Problem solved and advice taken. thank you!

 

[Micron]

Glad I could help!