Discussion :

[Siocn]

Bonjour,

Je cherche à générer des .txt à partir de certains onglets d'un workbook Excel.

Je n'arrive pas à le faire avec les fonctions save :
- SaveAs a le parametre FileFormat, mais cela convertit mon workbook courant en .txt
- SaveCopyAs ne semble pas gerer le FileFormat.

merci de votre aide.

[helios77]

Essaie un truc dans le genre

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
Sheets("Feuil1").Select
    Sheets("Feuil1").Copy
    ChDir "C:\"
    ActiveWorkbook.SaveAs Filename:= "C:\test.txt", FileFormat:=xlText
    ActiveWindow.Close

Ce code va copier ton onglet "Feuill1" dans un fichier texte "Feuil1"

tu remplaces xlTest par xlCSV si tu es interessé par un fichier avec des ";" en séparateur