Ho un problema nel listare file usando VBA di Access.
Sono riuscito a listare le cartelle ma non i file perchè per i file il metodo che conosco io (Getfile) vuole il nome del file ma io non lo conosco.

Questo è quello che lista le cartelle(in questo caso lista la cartella "prova" nel Desktop):

codice:
Dim fs As Object
Dim folder
Dim subfolder
Dim s
Dim f
Dim fld
Set fso = CreateObject("Scripting.FileSystemObject")
Set folder = fso.GetFolder("C:\Users\Riki\Desktop\prova")
Set subfolder = folder.SubFolders

f = fso.GetFileName("C:\Users\Riki\Desktop\prova\")

For Each fld In subfolder
    Testo2 = Testo2 & fld.Name & f
Next
a questo piccolo programma ci volevo aggiungere il listare dei file, così che mi listi tutti file e cartelle dato un percorso.