Save en CSV

domi · 9 Janvier 2004

Bonjour à tous

J'ai un programme externe à excel qui me rempli une feuille de données
et j'ai dans la cellule (A1) : TOTO

j'aimerai sauver cette feuille en C:\temp\TOTO.csv
Puis fermer excel automatiquement sans sauver en TOTO.xls

Merci d'avance

Pascal76 · 9 Janvier 2004

Salut Domi

Essaies avec un code du style

MonFichier=Range("A1")
ChDir "C:\Temp"
ActiveWorkbook.SaveAs Filename:="C:\Temp\" & MonFichier & ".csv", FileFormat:=xlCSV, _
CreateBackup:=False
ActiveWorkbook.Close

Je regarde la suite pour qu'il ne propose pas l'enregistrement

Bon couorage

Pascal

Save en CSV

domi

Guest

Pascal76

Guest

Discussions similaires