Une macro pour convertir en format .csv
debutante-excel
Messages postés
195
Statut
Membre
-
Le Pingou Messages postés 12274 Date d'inscription Statut Contributeur Dernière intervention -
Le Pingou Messages postés 12274 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour,
Voilà pour problème.
Je suis sous XP, j'ai environ 500 classeurs excel qui sont muti-feuille et qui possèdent tous une feuille nommée "d_bilan".
Je dois convertir donc chaque feuille "d_bilan" dans 500 classeurs au format .csv.
Es que qu'un serait me faire une macro pour faire celà.
Merci d'avance pour votre aide.
Voilà pour problème.
Je suis sous XP, j'ai environ 500 classeurs excel qui sont muti-feuille et qui possèdent tous une feuille nommée "d_bilan".
Je dois convertir donc chaque feuille "d_bilan" dans 500 classeurs au format .csv.
Es que qu'un serait me faire une macro pour faire celà.
Merci d'avance pour votre aide.
Configuration: Windows XP Internet Explorer 7.0
4 réponses
-
Bonsoir,
J'espère que j'ai été claire dans l'exposé de mon problème.
Merci de votre aide. -
Bonjour tout le monde,
arfffffffffff je suis en galère.
Bonne journée. -
Bonjour tout le monde,
Celà n'inspire personne en ce beau Week-end de pentecôte.
Bonne journée. -
Bonsoir,
Une proposition:
Sub ClasseurCVS()
' Copier/déplacer la feuille "d_bilan"
Sheets("d_bilan").Select
Sheets("d_bilan").Copy
ChDir "C:\Documents and Settings\Jean-Pierre\Bureau"
ActiveWorkbook.SaveAs Filename:= _
"C:\Documents and Settings\Jean-Pierre\Bureau\Classeur1.csv", FileFormat:= _
xlCSV, CreateBackup:=False
End Sub
Pas oublier d'adapter le chemin du répertoire (lignes en gras)