Common Dialog box open to current directory

[tkendall]

Hello, First post on these forums.

Google couldn't solve my questions so I'm turning to you, simple though it may be.

The code below is a basic open dialog box and assign the selected file to the ImportFile value. Upon click of the button I want the dialog box to open to the current path the file is located in. The path is easily found with CurrentProject. Path but I've been unable to assign this to the DirectoryList object.

Private Sub FileList_Click()
    DirectoryList.ShowOpen
    ImportFile.Value = DirectoryList.FileName

End Sub

Thanks for any help..

 

[DCrake]

If you use the Intellisense and select .InitDir = CurrentProject.Path

David

 

[tkendall]

Thanks for the quick response, must have missed this option..