je cherche juste la commande VBA pour afficher la boite de dialogue 'Enregistrer sous' d'excel
Est il également possbile de préciser le type de fichier (en l'espèce 'classeur excel')
et le nom du fichier (par exemple TOTO + le contenu de la cellule A12 de la feuille 1 du fichier) ?
Dim f As Variant
f = Application.GetSaveAsFilename("toto" & Sheets("NomFeuille").Range("A12"), "Fichiers Excel (*.xls), *.xls")
If VarType(f) = vbString Then ActiveWorkbook.SaveAs f