Læse alle filer i en mappe
Jeg har brug for en kodestump der indlæser alle filerne i en mappe.En løkke kører alle undermapper i en bestemt mappe igennem, men nu har jeg brug for at stien til alle filer i mapperne indlæses i en liste.
Løkken ser sådan her ud:
Set Biblioteker = fso.GetFolder(BibNavn).SubFolders
For Each Bibliotek In Biblioteker
Debug.Print Bibliotek.Name
Taeller = Taeller + 1
Debug.Print Taeller
Mapper(Taeller) = Bibliotek.Name
Next
Altså vil jeg gerne have at de filer der ligger i mapperne bliver indlæst i en liste på formularen.
Forstår I?? :D
/Kasper
c",)