Lister des fichiers dans une feuille Excel

Le
alain Lebayle
Bonjour,
J'ai dans un dossier dans lequel, j'ai une centaine de fichier mp3, je
souhaite les lister dans une feuille Excel, mais , je ne sais pas comment
m'y prendre.
Je vous remercie
Alain
--
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
JB
Le #18287211
Bonjour,

Sub ListeFichiers()
repertoire = ThisWorkbook.Path
i = 2
nf = Dir(repertoire & "*.xls")
Do While nf <> ""
Cells(i, 1) = nf
nf = Dir
i = i + 1
Loop
End Sub

JB
http://boisgontierjacques.free.fr/

On 3 jan, 17:55, "alain Lebayle" wrote:
Bonjour,
J'ai dans un dossier dans lequel, j'ai une centaine de fichier mp3, je
souhaite les lister dans une feuille Excel, mais , je ne sais pas comment
m'y prendre.
Je vous remercie
Alain
--


alain Lebayle
Le #18288841
Ok, parfait merci beaucoup
Alain

"JB"
Bonjour,

Sub ListeFichiers()
repertoire = ThisWorkbook.Path
i = 2
nf = Dir(repertoire & "*.xls")
Do While nf <> ""
Cells(i, 1) = nf
nf = Dir
i = i + 1
Loop
End Sub

JB
http://boisgontierjacques.free.fr/

On 3 jan, 17:55, "alain Lebayle" wrote:
Bonjour,
J'ai dans un dossier dans lequel, j'ai une centaine de fichier mp3, je
souhaite les lister dans une feuille Excel, mais , je ne sais pas comment
m'y prendre.
Je vous remercie
Alain
--





Publicité
Poster une réponse
Anonyme