Je découvre le VBA aujourd'hui à travers différents forums, en voulant forcer l'utilisateur à enregistrer le fichier avec un nom particulier dans un reperoire particulier lorsqu'il essaye de fermer le classeur excel
Pour cela j'utilise :Application.Dialogs.Item(xlDialogSaveAs).Show CStr(Nom)
Cependant, je n'arrive pas à forcer le dossier d'enregistrement.
Merci pour vos réponses,
Nom c 'est juste le nom de mon fichier excel, et du genre
Nom = "blabla" & Range()
Mais avec que le nom je n'ai pas de problème, c'est pour qu'il prenne aussi en compte le dossier dans lequel le fichier doit etre enregistré
PS : fhoest j'essaierai demain quand j'aurai à nouveau le fichier sous les yeux
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim Nom As String
Nom = "Blabla" & Range("A1")
ThisWorkbook.SaveAs Filename:="C:\...[I]chemin à adapter.[/I]...\..............\" & Nom & ".xls"
End Sub