Auto select all item in file dialog in vba access

Asked Oct 17 '19 at 02:27

Active Oct 17 '19 at 02:33

Viewed 572 times

I have vba access code that open file dialog and select item in special folder , I want auto select all item in this folder

Dim dialog As FileDialog
Dim filePath As String
Dim fileName As String

Set dialog = Application.FileDialog(msoFileDialogFilePicker)

With dialog
    .AllowMultiSelect = True
    .InitialFileName = "D:\MyTest\"
    .Show
    If .SelectedItems.Count <> 0 Then
        filePath = .SelectedItems.Item(1)

        Me.imgp = filePath
    End If
End With

edited Oct 17 '19 at 02:33

BigBen

46,229
7
24
40

asked Oct 17 '19 at 02:27

Rozha Roz

1

If you want all the files, why do you need to display the file dialog at all? The file dialog is to allow the user to select one or more files; if you're doing it yourself, you don't need to display it for the user. – Ken White Oct 17 '19 at 02:39
1

Sounds like you want the user to pick a folder, in which case `Application.FileDialog(msoFileDialogFolderPicker)` might be a better approach – Tim Williams Oct 17 '19 at 03:05
I want to get the path of all item in a folder to table – Rozha Roz Oct 17 '19 at 03:25
I try this code but I can't select all of them – Rozha Roz Oct 17 '19 at 03:45
Code has to loop through files in folder to 'select' - grab file names. What do you want to do with files? – June7 Oct 17 '19 at 04:10
I want to get all files path in folder and insert it to table – Rozha Roz Oct 17 '19 at 05:20
For i =1 to fd.SelectedItems.Count St=“D:\MyTest\”. Imgp= fd.SelectedItems.Item(i) – Rozha Roz Oct 17 '19 at 05:26
I try this code but I can’t select all item – Rozha Roz Oct 17 '19 at 05:36
You want to enter file path as a string into field? Do you want one record for each filename? Review http://allenbrowne.com/ser-59.html – June7 Oct 17 '19 at 08:35
Also, https://stackoverflow.com/questions/38480430/how-can-i-insert-all-the-files-names-in-a-folder-into-access-table – June7 Oct 17 '19 at 08:45
Yes , I want one record for each file name – Rozha Roz Oct 17 '19 at 08:48
Follow referenced examples, attempt code and if still have issue, edit question or start a new one. – June7 Oct 17 '19 at 09:00

Auto select all item in file dialog in vba access

0 Answers0