Problème avec Application.Dialogs(xlDialogSaveAs).Show

Bonsoir,

Je fais appel à vos super compétences. J'ai dans ma macro une ligne me permettant d'enregistrer le second fichier auquel je fais appel. Pour se faire, j'ai le code:

Code:

---

1 2	Application.Dialogs(xlDialogSaveAs).Show wbTS.Name, 1 Workbooks(wbTS.Name).Close True

---

Ma fenêtre s'ouvre bien, format .xls avec le bon nom de fichier. Mais rien ne se passe lorsque je clique sur Save (mon Excel est en anglais).

Avez-vous une idée du problème.

Merci d'avance
Mél

Code:

---

Application.Dialogs(xlDialogSaveAs).Show wbTS.Name, 1

---

Te permet seulement de SELECTIONNE un nom ou fichier
il faut ensuite sauver avec le retour de Dialogs

Code:

---

Application.SaveAs(...

---

A+