Problème VBA GetSaveAsFilename
Bonjour,
J'ai un petit soucis avec une macro qui devrait me permettre de nommer un fichier à partir d'une donnée présente en cellule "BF5" :
Code:
1 2 3 4 5 6 7 8 9 10
| Dim mail As String
mail = Range("BF5").Value
Dim nom
nom = Application.GetSaveAsFilename("Recap_" & mail, "Excel Files (*.xls), *.xls")
If nom <> False Then
ActiveWorkbook.SaveAs nom
End If |
Le problème est que lorsque l'explorateur Windows s'ouvre pour choisir le chemin d'enregistrement, le nom du fichier ne s'affiche pas (dans la barre de nom en bas).
Quelqu'un a une explication ? Je précise que la cellule "BF5" contient une adresse mail.
Merci d'avance,
Est3van