[VBA EXCEL] : Enregistrer sous

Bonjour,

J'ai crée un bouton "parcourir" afin d'enregistrer le fichier ouvert.

J'aimerai dans la barre juste en dessous du nom du fichier, limiter le format d'enregistrement a ".txt"!

Est-ce que c possible ?

Voici le code que j'ai utilisé :

Code:

---

1 2 3 4 5 6 7 8 9 10

Private Sub Bt_Enreg_Click()   Dim Chemin_Enreg As String   Chemin_Enreg = Application.GetSaveAsFilename Me.Txt_Enreg.Text = Chemin_Enreg     End Sub

---

Merci !!

Code:

---

1 2	Application.GetSaveAsFilename( _ fileFilter:="Text Files (*.txt), *.txt")

---

présent dans l'aide F1 ....

Citation:

---

J'aimerai dans la barre juste en dessous du nom du fichier,

---

De quoi parles-tu ? Quelle barre ?

Regarde à SaveAs dans l'aide et puis cette ligne obtenue en enregistrant la macro (vba97)

Code:

---

1 2	ActiveWorkbook.SaveAs FileName:="D:\xls\fichierAeffacer.txt" _ , FileFormat:=xlText, CreateBackup:=False

---

Je ne sais pas ce que ça donne en VBA 2003, sans doute la syntaxe donnée par juness ;)

c'est super ca marche !

Merci bcp pour votre aide