Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Macro sauvegarder et quitter excel

Antho35

XLDnaute Occasionnel
Bonjour,

Je veux créer une macro qui enregistre automatiquemtn mon fichier, qui le ferme et quitte excel.

Qui à des tuyaux

merci.
 

job75

XLDnaute Barbatruc
Re : Macro sauvegarder et quitter excel

Bonsoir,

Si d'autres fichiers sont ouverts, il vaut mieux :

Code:
ActiveWorkbook.Save
If Workbooks.Count = 1 Then Application.Quit Else ThisWorkbook.Close

A+
 

Antho35

XLDnaute Occasionnel
Re : Macro sauvegarder et quitter excel

Bonjour,

Merci, j'ai besoin de plus de précision, ce code je le met dans quel macro, j'ai essyé plusieurs choses mais rien de conculants.

Merci
 

kiki29

XLDnaute Barbatruc
Re : Macro sauvegarder et quitter excel

Salut, dans module ThisWorkbook
Code:
Option Explicit

Private Sub Workbook_BeforeClose(Cancel As Boolean)
    ActiveWorkbook.Save
    If Workbooks.Count = 1 Then Application.Quit Else ThisWorkbook.Close
End Sub
 

Antho35

XLDnaute Occasionnel
Re : Macro sauvegarder et quitter excel

Re Bonjour,

Mon soucci maintenant c'est que qu'on le code est dans mon thisworkbook, il l'excute automatiquement à l'ouerture du fihcier.

Je voudrais placer ce code dans un bouton, mais il doit me manquer quelque chose.

J'ai déjà un thisworkbook, qui ouvre automatiqument à louverture du fihcier l'onglet principal.
 

Paritec

XLDnaute Barbatruc
Re : Macro sauvegarder et quitter excel

Bonjour Kiki Anthon 35,
je lis tes réponses Anthon et je pense que tu le fais exprès, ou alors tu ne fais pas ce que Kiki t'a envoyé !!!!
Alors une fois de plus si vous ne savez pas faire ayez au moins la sagesse de joindre un fichier, on mettra la macro au bon endroit.
Tu m'expliqueras comment une procèdure BeforeClose peut s'effectuer au démarrage !!!
a+
papou
 

Cousinhub

XLDnaute Barbatruc
Re : Macro sauvegarder et quitter excel

Bonjour,

je voudrais juste apporter une petite précision sur le code proposé.

Si vous possédez une macro dans le perso.xls, votre nombre de classeur augmentera de 1

1 seul classeur ouvert, plus macro perso :

Code:
Workbooks.Count = 2

Juste pour cette précision...
 

Antho35

XLDnaute Occasionnel
Re : Macro sauvegarder et quitter excel

Bonjour,

Voci, non je n'en fait pas exprés.

Ci joint un morceaux du fichier le code est ^place dans le this workbooks. Je veux faire excuter cette commande lors qu'on clic sur quitter.

Merci
 

Pièces jointes

  • Copie de DEMANDE DE TRANSPORT.zip
    46.2 KB · Affichages: 413

Discussions similaires

Réponses
4
Affichages
202
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…