bonjour a tous ,
je souhaite créer une macro avec Visual basic editor sous Excel qui me permettrait de rapatrier les noms des fichiers présent dans le dossier source du fichier Excel... quelqu'un pourrait-il m'aider a écrire cette macro ou un morceau de cette macro??
merci d'avance....
bien...merci pour ton info mais malheureusement, je n'ai trouvé sur ce site que des bouquins a acheter... je pensais que quelqu'un pouvait me filer un morceau de prog ou une info sur la prog directement...Encore merci pour ton coup de main et pour ta recherche!!!
Merci Mariam,
ton lien va m'aider dans mon initiation...
en fait ce que je souhaite faire c'est la chose suivante:
J'ai un dossier "papa" a l'intérieur duquel se trouvent plusieurs dossiers "papi1", "papi2".... j'ai créer un fichier excel et je souhaite créer une macro sous forme d'un bouton me permettant de rappatrier les noms des dossiers "papi1", "papi2"... dans la feuille excel. je pourrai donc lister les noms des dossiers inclu dans le dossier source du fichier excel...
re
le reste c'est de la gneugneu pur toi ensuite avec plaisir a+
mais perso j'ai jamais utiliser papi lol je pense qu'une fois la macro faite, tu pourras creer ta feuille sans probleme et l'exporter
[ Ce message a ete modifié par : : mariam le 14-02-2005 18:15 ]
Sub Macro1()
'
' Macro1 Macro
' Macro enregistrée le 01/03/2005 par PG
'
Dim liste_dossiers(50)
dossier_depart = "C:\"
index_liste = 1
dossier_lu = Dir(dossier_depart, vbDirectory)
Do While dossier_lu <> ""
If dossier_lu <> "." And dossier_lu <> ".." Then
If (GetAttr(dossier_depart & "\" & dossier_lu) And vbDirectory) = vbDirectory Then
liste_dossiers(index_liste) = dossier_lu
en_cours = "A" & index_liste
Range(en_cours).Value = dossier_lu
index_liste = index_liste + 1
End If
End If
dossier_lu = Dir
Loop
End Sub
la liste des dossiers est stockée dans une variable tableau (inutile).
@+
Sauf mention contraire, le contenu du blog et du forum est sous licence Creative Commons By-Sa. Vous avez le droit de le reproduire à condition de citer l'auteur, de faire un lien vers la page d'origine, et de partager vos travaux dérivés selon les mêmes conditions.
,
44 ans.
