Enregistrer un fichier excel au format txt

Question

Bonjour,

Je cherche le moyen d'enregistrer mes feuilles excel au format txt.
Quelqu'un pourrait-il m'aider.

Merci
Benjamin

stevebelgium · Answer

ActiveWorkbook.SaveAs FileName:="C:\WINNT\Profiles\dua.s\Desktop\Book1.txt", _
        FileFormat:=xlText, CreateBackup:=False

neo3015 · Answer

si c'est pour une base de données tu peux directement importer un fichier xls dans une table avec le menu fichier, importer ...
sinon tu enregistre ton fichier xls en un format csv (coma separated value pour valeurs séparée par virgule)

donc chaque valeurs est séparée d'une virgule.
pour voir le résultat tu ourve le fichier csv avec wordpad ou notpad....

et puis tu ouvre le fichier avec vba (avec du code derriere un btn) et tu fais tes recherhce de caractères

bonne prog
neo3015

benjavd · Answer

J'ai essayé, mais je reçois une erreur:
Run-time error '1004'
SaveAs method of Worksheet class failed

stevebelgium · Answer

c'est normalle , par-ce-que le path n'extistes pas 

> C:\Book1.txt  path + nom

ActiveWorkbook.SaveAs FileName:="C:\Book1.txt", FileFormat:=xlText, CreateBackup:=False

benjavd · Answer

Si, le path existe, je pense que le problème vient du FileFormat:=xlText.
Cela fonctionne bien et VBA mais pas en VB6.
Si je n'utilise pas le FileFormat:=xlText ça fonctionne mais alors il enregistre tout le "Book" en xls alors qu'il ne me faut qu'une feuille en txt.

stevebelgium · Answer

xltext = -4158

ActiveWorkbook.SaveAs FileName:="C:\Book1.txt", FileFormat:=-4158, CreateBackup:=False

ca marche ?

benjavd · Answer

Oui, merci beaucoup.

Enregistrer un fichier excel au format txt

7 réponses

Discussions similaires