[Résolu] GetSaveAsFilename : pas de nom de fichier sur 2010

[eriiic]

Bonsoir,

Sur ce post (le lien vers le fichier y est) où je répondais à une question j'utilise GetSaveAsFilename.
Hors, le nom du fichier n'est pas pré-rempli sur 2010, alors qu'il apparait bien si je l'ouvre sur 2003.
Qu'est-ce qui rend 2010 si susceptible ?

Pour info la ligne de code des fois que l'erreur vous apparaisse tout de suite :

Sauvegarde = Application.GetSaveAsFilename(chemin & [B7], FileFilter:="Fichiers Excel (*.xl*), *.xl*")
avec par exemple :
chemin= "D:\1\"
B7= "1-2-3-4-5.xlsm"

Merci
eric

 

[eriiic]

Re : GetSaveAsFilename : pas de nom de fichier sur 2010

Un petit up pour les nuiteux ;-)

 

[Gareth]

Re : GetSaveAsFilename : pas de nom de fichier sur 2010

Bonsoir

En utilisant un libellé relevé dans la boite de dialogue enregistrer sous, ça a l'air de fontionner ...

Sauvegarde = Application.GetSaveAsFilename(chemin & [B8], FileFilter:="Classeur Excel (*.xlsx), *.xlsx")

 

[eriiic]

Re : GetSaveAsFilename : pas de nom de fichier sur 2010

Bonjour,

Ok, super.
En résumé :
Avec GetSaveAsFilename(), sur 2010, si on utilise un caractère générique dans l'extension de FilterIndex (*.xl*) alors ne pas mettre l'extension du fichier dans FileFilter sinon le nom du fichier n'est pas pré-rempli (au risque que l'utilisateur ne choisisse pas la bonne extension).
Même punition si on liste les extensions (*.xlsm;*.xls)...

Merci beaucoup Gareth

eric