16
Moderator
#1
Open / browse Folders

Code:
Private Sub btnBrowseForFolder_Click()

    Dim strFolderName As String

    strFolderName = BrowseFolder("Choose Folder For Import")

    If Len(strFolderName) > 0 Then
        ' Do something with the selected folder
    Else
        'No folder chosen, or user canceled
    End If

End Sub
Reply



Forum Jump:


Users browsing this thread:
1 Guest(s)