fermer excel par un bouton

M

Moa

Guest

• 22 Septembre 2004

• #2

Re Violaine !

Simplement :

ActiveWorkbook.Close

Après Excel risque de te demander si tu veux sauvegarder les changements ou non.

Si tu sauvegarder sans qu'Excel te le demande :

Application.DisplayAlerts = False (Pour annuler le message)
ActiveWorkbook.Save (Pour sauvegarder les changements
Application.DisplayAlerts = True (Remettre Excel en ordre)



@ +

Moa

 

Vote positif 0 Vote négatif

S

sassouki

Guest

• 22 Septembre 2004

• #3

Salut moa,
Et je veux fermer une feuille par d'autres ouverte en même temps sans faire l'enregistrement.
Merci moa pour l'aide.
A++

 

Vote positif 0 Vote négatif

V

violaine

Guest

• 22 Septembre 2004

• #4

merci moa

 

Vote positif 0 Vote négatif

M

Moa

Guest

• 22 Septembre 2004

• #5

Salut Sassouki !

Application.DisplayAlerts = False (Pour annuler le message)
ActiveWorkbook.Close
Application.DisplayAlerts = True (Remettre Excel en ordre)

Tout simplement

@ +

Moa

 

Vote positif 0 Vote négatif

S

sassouki

Guest

• 22 Septembre 2004

• #6

Resalut moa et merci beaucoup.
Voila c'est simple, mais je dois preciser la feuille à fermer par ce que j'ai plusieurs feuilles ouvertes après l'exécution de ma macro..

Sassouki
A++++

 

Vote positif 0 Vote négatif

M

Moa

Guest

• 22 Septembre 2004

• #7

Re !

ActiveWorkbook veut dire le classeur actif, donc celui que tu vois affiché devant toi.

Si maintenant, tu désires fermer un autre classeur, il est clair qu'il faudra préciser le nom de ce dernier et il me semble que tu dois par conséquent l'activer d'abord.

Windows("LeNomDuClasseurAFermer").Activate
Application.DisplayAlerts = False
ActiveWorkbook.Close
Application.DisplayAlerts = True

Et si tu ne veux pas voir le raffraîchissement de l'écran, pendant les opérations.

Application.ScreenUpdating = False
Windows("LeNomDuClasseurAFermer").Activate
Application.DisplayAlerts = False
ActiveWorkbook.Close
Application.DisplayAlerts = True (Toujours remettre Excel en Ordre)
Application.ScreenUpdating = True (Et encore remettre Excel en ordre)

@ +

Moa

 

Vote positif 0 Vote négatif

R

Robert

Guest

• 22 Septembre 2004

• #8

Salut à tous,

Puisqu'on s'est croisé avec Moa sur un autre post de Violaine, je me permets d'apporter une petite contribution. Si on désire fermer un classeur sans enregister les dernières modification on peut utiliser :

ActiveWorkbook.Close savechanges:=False

Cela évite les :
Application.DisplayAlerts = False
Application.DisplayAlerts = True

en enregistrant (il remplacer le "False" par "True")
ActiveWorkbook.Close savechanges:=True

À plus,

Robert

 

Vote positif 0 Vote négatif

S

sassouki

Guest

• 22 Septembre 2004

• #9

Re salut à tous,
Je vous remercie moa "c'est ce que je cherche exactement ",


Enfin merci à tous, qu'on se retrouve très prochainnement.
A+
Sassouki

 

Vote positif 0 Vote négatif