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
--------------------


--
scantor145
------------------------------------------------------------------------
scantor145's Profile: http://www.excelforum.com/member.php...o&userid=14766
View this thread: http://www.excelforum.com/showthread...hreadid=383858