I use a bunch of folders that are all over the place on my network. I would like to type in a code and change the directory and then open the file open dialog box to allow me to 'jump' right to the folder I need.
I understand there are "favorites" on the left panel of the open file dialog box but thats not the way I want to do this. Obviously the path names are not all so simple or even on my C drive.
Basically if i remove the file dialog part at the bottom I can change the directory to the proper folder no problem. But when I use the file dialog part next it opens it up to the same directory each time.
Let me know if I am using the wrong file open dialog thing.
I understand there are "favorites" on the left panel of the open file dialog box but thats not the way I want to do this. Obviously the path names are not all so simple or even on my C drive.
Basically if i remove the file dialog part at the bottom I can change the directory to the proper folder no problem. But when I use the file dialog part next it opens it up to the same directory each time.
Let me know if I am using the wrong file open dialog thing.
Code:
Sub my_districts()
dist = InputBox("Enter the district.")
Select Case dist
Case Is = "can"
fldr = "C:\canton"
Case Is = "ec"
fldr = "C:\east central"
Case Is = "mid"
fldr = "C:\midland"
Case Is = "man"
fldr = "C:\manor"
Case Is = "geo"
fldr = "C:\george"
Case Else
MsgBox ("Bad District")
Exit Sub
End Select
ChDrive (fldr)
ChDir (fldr)
Application.FileDialog(msoFileDialogOpen).Show
End Sub