fichier texte

Le
Michel (pen ar bed)
Bonjour,
voila une bonne heure que je cherche mais ne trouve pas comment faire

dans une feuille j'ai un bouton qui fait ceci

ActiveWorkbook.SaveCopyAs Filename:="C:ps1.txt",
FileFormat:=xlCSVMSDOS

c'est bon ça marche mais mon classeur n'est plus au format standard
Excel

ce que je cherche à faire c'est exporter les données de la feuille vers
un fichier texte au format CSV sans que le classeur est changé
je trouve pas dans l'aide l'astuce qui va bien.

Merci de l'aide
M.
M.
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
Daniel.C
Le #5185211
Si ton classeur est déjà enregistré :
ActiveWorkBook.Save
De: "Michel (pen ar bed)" Objet: fichier texte
Date: mercredi 12 mars 2008 16:07

Bonjour,
voila une bonne heure que je cherche mais ne trouve pas comment faire

dans une feuille j'ai un bouton qui fait ceci

ActiveWorkbook.SaveCopyAs Filename:="C:ps1.txt",
FileFormat:=xlCSVMSDOS

c'est bon ça marche mais mon classeur n'est plus au format standard
Excel

ce que je cherche à faire c'est exporter les données de la feuille vers
un fichier texte au format CSV sans que le classeur est changé
je trouve pas dans l'aide l'astuce qui va bien.

Merci de l'aide
M.
M.





"Michel (pen ar bed)"
Bonjour,
voila une bonne heure que je cherche mais ne trouve pas comment faire

dans une feuille j'ai un bouton qui fait ceci

ActiveWorkbook.SaveCopyAs Filename:="C:ps1.txt", FileFormat:=xlCSVMSDOS

c'est bon ça marche mais mon classeur n'est plus au format standard Excel

ce que je cherche à faire c'est exporter les données de la feuille vers un
fichier texte au format CSV sans que le classeur est changé
je trouve pas dans l'aide l'astuce qui va bien.

Merci de l'aide
M.
M.




Daniel.C
Le #5185201
Si ton classeur n'est pas enregistré :
ActiveWorkBook.Save
ActiveWorkbook.SaveCopyAs Filename:="C:ps1.txt", FileFormat:=xlCSVMSDOS
autrement :
ActiveWorkBook.SaveAs "toto.xls"
ActiveWorkbook.SaveCopyAs Filename:="C:ps1.txt", FileFormat:=xlCSVMSDOS
Daniel
"Michel (pen ar bed)"
Bonjour,
voila une bonne heure que je cherche mais ne trouve pas comment faire

dans une feuille j'ai un bouton qui fait ceci

ActiveWorkbook.SaveCopyAs Filename:="C:ps1.txt", FileFormat:=xlCSVMSDOS

c'est bon ça marche mais mon classeur n'est plus au format standard Excel

ce que je cherche à faire c'est exporter les données de la feuille vers un
fichier texte au format CSV sans que le classeur est changé
je trouve pas dans l'aide l'astuce qui va bien.

Merci de l'aide
M.
M.




Michel (pen ar bed)
Le #5185171
Daniel.C avait prétendu :
Si ton classeur n'est pas enregistré :
ActiveWorkBook.Save
ActiveWorkbook.SaveCopyAs Filename:="C:ps1.txt", FileFormat:=xlCSVMSDOS
autrement :
ActiveWorkBook.SaveAs "toto.xls"
ActiveWorkbook.SaveCopyAs Filename:="C:ps1.txt", FileFormat:=xlCSVMSDOS
Daniel
c'est bien, ça marche, mais il faut répondre à chaque demande d'écraser

le fichier existant quant on repasse d'un mode à l'autre

ce que je cherche (sans pour l'instant trouver) c'est plutôt une macro
qui sauvegarder les données d'un page sur un fichier texte (csv) sans
toucher au classeur. Possible ?
Merci du temps passé à m'aider
M.

Daniel.C
Le #5185121
Application.EnableEvents = False
ActiveSheet.Copy
ActiveWorkbook.SaveAs "C:ps1.txt", FileFormat:=xlCSVMSDOS
Application.EnableEvents = True

Daniel
"Michel (pen ar bed)"
Daniel.C avait prétendu :
Si ton classeur n'est pas enregistré :
ActiveWorkBook.Save
ActiveWorkbook.SaveCopyAs Filename:="C:ps1.txt", FileFormat:=xlCSVMSDOS
autrement :
ActiveWorkBook.SaveAs "toto.xls"
ActiveWorkbook.SaveCopyAs Filename:="C:ps1.txt", FileFormat:=xlCSVMSDOS
Daniel
c'est bien, ça marche, mais il faut répondre à chaque demande d'écraser le

fichier existant quant on repasse d'un mode à l'autre

ce que je cherche (sans pour l'instant trouver) c'est plutôt une macro qui
sauvegarder les données d'un page sur un fichier texte (csv) sans toucher
au classeur. Possible ?
Merci du temps passé à m'aider
M.





Michel (pen ar bed)
Le #5185111
Daniel.C a formulé ce mercredi :
Si ton classeur n'est pas enregistré :
ActiveWorkBook.Save
ActiveWorkbook.SaveCopyAs Filename:="C:ps1.txt", FileFormat:=xlCSVMSDOS
autrement :
ActiveWorkBook.SaveAs "toto.xls"
ActiveWorkbook.SaveCopyAs Filename:="C:ps1.txt", FileFormat:=xlCSVMSDOS
Daniel



Merci de l'aide et du temps passé à me répondre

Finalement j'ai trouvé sur Excelabo une macro qui fait bien mes
affaires

M.

Publicité
Poster une réponse
Anonyme