Enregistrer sous

Bonjour,

Le suivant macro ouvre une fenêtre "enregistrer sous" avec un nom défini et un filtre pour que le fichier soit enregistré en CSV, mais quand je fais accepter le fichier il ne s'enregistre pas dans l'ordi. Je peux le trouver au accès rapide mais quand je l'ouvre il s'affiche un message "Désolé nous ne trouvons pas, peut être vous l'avez déplacé, renommé ou supprimé?

Quelqu’un sait m'aider?

Dim Nomfeuil As String

Nomfeuil = "EXTRACT ALEAS " & " " & "FSN" & " " & Range("M9") & ".csv"

EnregistrerSous = Application.GetSaveAsFilename(InitialFileName:=Nomfeuil, _

FileFilter:="CSV (*.csv),*.csv")

Merci

Bonjour,

Aide Excel pour la méthode Application.GetOpenFilename :

Affiche la boîte de dialogue Enregistrer sous standard et obtient un nom de fichier de l’utilisateur sans enregistrer réellement les fichiers.

Cdlt.