Hello, I have a dialog box that opens on a form that lets the user browse files. I simply want to limit it to Folders, how can I do that? Need ASAP. Thanks. ACCESS 2007.
Here is my code, how do I prevent it from showing files? I want Folders only.
Expand|Select|Wrap|Line Numbers
- 'Declare a variable as a FileDialog object.
- Dim fd As FileDialog
- 'Declare a variable to contain the path
- 'of each selected item. Even though the path is aString,
- 'the variable must be a Variant because For Each...Next
- 'routines only work with Variants and Objects.
- Dim vrtSelectedItem As Variant
- 'Use a With...End With block to reference the FileDialog object.
- With fd
- 'Use the Show method to display the File Picker dialog box and return the user's action.
- 'The user pressed the button.
- If .Show = -1 Then
- 'Step through each string in the FileDialogSelectedItems collection.
- For Each vrtSelectedItem In .SelectedItems
- 'You can use any file I/O functions that you want to work with this path.
- 'This example displays the path in a message box.
- MsgBox "The path is: " & vrtSelectedItem
- Next vrtSelectedItem
- 'The user pressed Cancel.
- Else
- End If
- End With
- 'Set the object variable to Nothing.
- Set fd = Nothing