Open dialog box to a particular folder
I am currently using the following code to browse the hard drive for csv files. The files I am looking for are stored in a particular folder. The problem is that it appears that the open box opens to the location of the last opened file. I want to open the folder that contains the files I am looking for everytime. Is there a way to do this?
Public Sub cmdBrowse_Click()
dim fileName as string
Const iTitle = "Graph Setup"
Const FilterList = _
"Comma-delimited (*.csv),*.csv"
With Application
fileName = .GetOpenFilename(Title:=iTitle, _
filefilter:=FilterList, _
FilterIndex:=1)
End With
If fileName = "False" Then
Exit Sub
End If
End Sub
Jeff Armstrong
Sr. Systems Mgr
SBC Services, Inc.
__________________
Jeff Armstrong
Sr. Systems Mgr
SBC Services, Inc.
|