Quitter Excel VBA avec sauvegarde en changeant de nom du fic

Bonjour à tous,

Dans mon projet je voudrai faire une fermeture du fichier ainsi que l'application. Mais avnat je voudrai qu'il me donne une boite de dialogue afin de pouvoir changer le nom de mon fichier

Merci beaucoup de votre aide.

@+

Amicalement

Noel

salut le forum

Un début de solution

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.Dialogs(xlDialogSaveAs).Show
Application.Quit
End Sub

Mytå

Bonjour à tous,

Bonjour Myta,

Tu es le seule à être en éveil à cette heure ci chez nous.

Si je me rappelle tu es au Canada. Un Noël chez toi cela doit être formidable. Un Noel tout blanc alors que chez nous il est tout rouge avec les flamboyants et les letchis.

Je te remercie pour ton début de solution. Dois-je l'installer dans le thisworkbook?

Je vais l'essayer.

Je te souhaite de passer de bonne fêtes de fin d'année à tous le les forumeurs ainsi qu'à toute l'équipe du forum qui sont des personnes dévouées pour répondre à nos attentes.

@+

Amicalement

Noel

Re Myta,

Bon ça fonctionne .

Je te remercie à plus

Amicalement

Noel