Copie de feuilles sur un fichier global - VB/VBA/VBS - Programmation
Marsh Posté le 14-10-2010 à 23:27:47
Salut, dans un premier temps voir par exemple http://forum.hardware.fr/hfr/Progr [...] m#t1750135
ou même plus récemment ( sans récursion dans la recherche de fichiers ) http://forum.hardware.fr/hfr/Progr [...] 0929_1.htm et adapter à ton contexte, puis pour poursuivre http://forum.hardware.fr/hfr/Progr [...] 7546_1.htm
sans oublier de s'aider du macro recorder
Marsh Posté le 14-10-2010 à 09:38:27
Bonjour,
Je souhaite faire une macro qui m'ouvre tous les fichier .asc d'un repertoire, les mets en forme pour xls (séparateur virgule+espace+pointvirgurle), puis coupe la feuille du fichier xls et la colle sur un fichier recap (support de la macro)
J'en suis là et je bloque!
Sub ouvrir_fichiers()
ChDir "U:\Cont\Coeur\Boitier"
monfichier = Dir("\*.asc" )
While monfichier <> ""
Workbooks.Open monfichier
monfichier = Dir()
Wend
End Sub
Somebody help?