Tous les repertoires et fichiers de mon disque dur

Le
Toto
Bonjour

je cherche une macro pour lister tous les fichiers et les repertoires de mon disque du
Recurssif si possibl

Merci d'avanc
Toto
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Nicolas B.
Le #1264977
Salut,

Inspire-toi de Filsesearch :

Sub Recherche()
With Application.FileSearch
.NewSearch
.LookIn = "C:"
.SearchSubFolders = True
.Filename = "*"
.Execute
For i = 1 To .FoundFiles.Count
Cells(i, 1) = .FoundFiles(i)
Next
End With
End Sub


A+
--
Nicolas B.


Bonjour

je cherche une macro pour lister tous les fichiers et les repertoires
de mon disque dur Recurssif si possible

Merci d'avance
Toto


Misange
Le #1264973
bonjour
tu trouveras ça tout fait sur excelabo, page répertoires et ausi sur le
site de Frédéric Sigonneau.

Misange migrateuse http://www.excelabo.net
mail : http://cerbermail.com/?k5Q8Dh2mta


Bonjour

je cherche une macro pour lister tous les fichiers et les repertoires de mon disque dur
Recurssif si possible

Merci d'avance
Toto


Publicité
Poster une réponse
Anonyme