Code VBA pour fermer un classeur et quitter

Fermé
purspirit Messages postés 13 Date d'inscription lundi 12 janvier 2009 Statut Membre Dernière intervention 23 mars 2009 - 30 janv. 2009 à 15:32
purspirit Messages postés 13 Date d'inscription lundi 12 janvier 2009 Statut Membre Dernière intervention 23 mars 2009 - 31 janv. 2009 à 14:29
Bonjour,
comment faire(le code) pour fermer toutes les feuilles excel et quitter l'application?

Merci bcp
A voir également:

3 réponses

guy2mars Messages postés 204 Date d'inscription dimanche 18 février 2007 Statut Membre Dernière intervention 24 janvier 2013 71
30 janv. 2009 à 15:44
For Each w In Application.Workbooks
w.Save
Next w
Application.Quit
0
purspirit Messages postés 13 Date d'inscription lundi 12 janvier 2009 Statut Membre Dernière intervention 23 mars 2009
30 janv. 2009 à 16:55
Salut guy2mars,
ça marche pas, j'ai essayer! je sais pas exactement où se trouve l'erreur. Voulez vous bien me re écrire le code avec + d'explication(càd désigner le non du classeur exactement)?
Merci
0
guy2mars Messages postés 204 Date d'inscription dimanche 18 février 2007 Statut Membre Dernière intervention 24 janvier 2013 71
30 janv. 2009 à 19:20
Slt

tu enregistres une feuille macro (par defaut excel met macro1)

sub macro1()
For Each worksheet In Application.Workbooks 'tu travailles dans le dossier existant et pour chaque worksheet
worksheet.Save 'la worksheet est sauvegardée
Next worksheet 'tu passes a la 2e worksheet
Application.Quit 'tu quittes excel

end sub

ca marche aussi sans ecrire worksheet mais seulement w
tu dois associer une icone ou un objet a ta macro
et ca roule
0
purspirit Messages postés 13 Date d'inscription lundi 12 janvier 2009 Statut Membre Dernière intervention 23 mars 2009
31 janv. 2009 à 14:29
Merci infiniment.
0