Visual Basic - Seleccionar Carpeta

Hola
Tengo que seleccionar la ruta de una carpeta a traves de un CommonDialog1 hago el CommonDialog1.ShowOpen y luego como guardo la ruta de la carpeta?
cmdSelFich = CommonDialog1.FileName me obliga a poner el nombre de para un fichero.
Gracias

Marta: Lo más conveniente en ese caso es utilizar BrowseForFolder. No está en un commonddialog, se ubica en Shell32. Lo primero que debés hacer es instanciar la dll. Para ello, vas al menú proyecto\referencias y seleccioná Microsoft Shell Controls And Automation. Utilizá este cófigo:

Private Sub Command1_Click()
Dim sh As Shell32.Shell, fdl As Shell32.Folder
Set sh = New Shell32.Shell
Set fdl = sh.BrowseForFolder(0, "Buscando carpetas", 0)
MsgBox fdl.Items.Item.Path 'Path del archivo
Set fdl = Nothing
Set sh = Nothing
End Sub

Espero que te sirva
Saludos Ruri