Hey guys,
I am looking at using this code but was wondering if there was a way to set it to some initial folder/directory location, is this an option? Thanks.
[VBA]
Dim oApp As Object
Dim oFolder As Variant
Set oApp = CreateObject("Shell.Application")
'Browse to the folder
Set oFolder = oApp.BrowseForFolder(0, "Select folder", 512)
If Not oFolder Is Nothing Then
MsgBox "You select this folder : " & oFolder.Self.Path
End If
[/VBA]