S
scantor145
Excel 2002 with Visual Basic 6.3
The code below allows me to select a desired folder, but I then need to
assign the name of that folder to a varibale. I'm at a loss right now.
Code:
--------------------
Sub GetAFolder()
With Application.FileDialog(msoFileDialogFolderPicker)
.InitialFileName = Application.DefaultFilePath & "\"
.Show
If .SelectedItems.Count = 0 Then
MsgBox "Canceled"
Else
MsgBox .SelectedItems(1)
End If
End With
End Sub
The code below allows me to select a desired folder, but I then need to
assign the name of that folder to a varibale. I'm at a loss right now.
Code:
--------------------
Sub GetAFolder()
With Application.FileDialog(msoFileDialogFolderPicker)
.InitialFileName = Application.DefaultFilePath & "\"
.Show
If .SelectedItems.Count = 0 Then
MsgBox "Canceled"
Else
MsgBox .SelectedItems(1)
End If
End With
End Sub