Boite de dialogs

Bonjour,

Je souhaiterai pré-remplir le nom du fichier dans la boite de dialogue Enregistrer sous

Voici mon code

Sub test()
nom_fichier = F_adresses.Cells(2, 3) ' récupération du nom du fichier
With Application.Dialogs(xlDialogSaveAs)
.xxxx=nom_fichier
.Show
End With
End Sub

C'est la syntaxe de la ligne en rouge que je trouve pas

Merci