Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Quitter Excel - VBA

Quitter Excel - VBA

9 réponses
Avatar
Stéphan DuQuébec
Bonjour,

Pour les deux commandes suivantes:

ThisWorkbook.Close
ou
Application.Quit

Aucune n'a pour effet de FERMER la fenêtre Excel à la suite de la procédure
(comme le ferait l'action d'appuyer sur le Query Close).

Connaissez-vous la commande utile à le faire.

Merci.
Signaler un problème avec ce contenu

9 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Frédo P
Application.Quit dans une procédure normal ferme Excel chez moi
--
Fred


"Stéphan DuQuébec" a écrit dans le
message de news:
Bonjour,

Pour les deux commandes suivantes:

ThisWorkbook.Close
ou
Application.Quit

Aucune n'a pour effet de FERMER la fenêtre Excel à la suite de la
procédure

(comme le ferait l'action d'appuyer sur le Query Close).

Connaissez-vous la commande utile à le faire.

Merci.


Avatar
Stéphan DuQuébec
Et bien....

Chez-moi, le fichier se ferme mais Excel ne se ferme pas.

Je suis sur Excel 2002



Application.Quit dans une procédure normal ferme Excel chez moi
--
Fred


"Stéphan DuQuébec" a écrit dans le
message de news:
Bonjour,

Pour les deux commandes suivantes:

ThisWorkbook.Close
ou
Application.Quit

Aucune n'a pour effet de FERMER la fenêtre Excel à la suite de la
procédure

(comme le ferait l'action d'appuyer sur le Query Close).

Connaissez-vous la commande utile à le faire.

Merci.







Avatar
JLuc
*Bonjour Stéphan DuQuébec*,
J'ai eu le meme pb, on m'a conseiller de le mettre dans le module
thisworkbook
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.Quit
End Sub
Et la, ca marche. Essaie et dis nous
Et bien....

Chez-moi, le fichier se ferme mais Excel ne se ferme pas.

Je suis sur Excel 2002



Application.Quit dans une procédure normal ferme Excel chez moi
--
Fred


"Stéphan DuQuébec" a écrit dans le
message de news:
Bonjour,

Pour les deux commandes suivantes:

ThisWorkbook.Close
ou
Application.Quit

Aucune n'a pour effet de FERMER la fenêtre Excel à la suite de la procédure
(comme le ferait l'action d'appuyer sur le Query Close).

Connaissez-vous la commande utile à le faire.

Merci.








--
JLuc

Pensez a regarder ces sites très bien fait, ce sont des mines de trucs
et astuces !
http://www.excelabo.net
http://jacxl.free.fr/
http://dj.joss.free.fr/
C:Program FilesMicrosoft OfficeOffice1036VBALIST.XLS



Avatar
michdenis
Bonjour Stéphan,

Testé dans la version Excel 2003, ceci ferme tous les classeurs issus de la MÊME INSTANCE sans demander à l'usager de sauvegarder
quoi que ce soit :

Application.DisplayAlerts = False
Application.Quit

Le danger de cette méthode est de fermer excel sans avoir l'opportunité de sauvegarder.
À toi de voir !

Tout se ferme même si ces 2 lignes sont inscrites dans un formulaire(userform)


Salutations!






"Stéphan DuQuébec" a écrit dans le message de news:

Bonjour,

Pour les deux commandes suivantes:

ThisWorkbook.Close
ou
Application.Quit

Aucune n'a pour effet de FERMER la fenêtre Excel à la suite de la procédure
(comme le ferait l'action d'appuyer sur le Query Close).

Connaissez-vous la commande utile à le faire.

Merci.
Avatar
Stéphan DuQuébec
Messieurs JLuc & michdenis,

Ma procédure est dans un userform en événement Click de bouton (je ne peux
la mettre en BeforeClose).

La voici:

Private Sub CommandButtonBidon1_Click()

Application.ScreenUpdating = False

Sheets("AlerteMacros").Visible = True
Sheets("Cumulatif 2005").Visible = xlVeryHidden
Sheets("DonnéesBoutons").Visible = xlVeryHidden

ActiveWorkbook.Save
ThisWorkbook.Close
Application.Quit

End Sub

J'ai déjà prévu une validation concernant la possibilité de quitter sans
enregistrer, par mégarde. Pas de problème là-dessus.

Cependant, avec mon actuelle procédure (ci-haut), la fenêtre Excel ne ferme
pas.

Pouvez-vous l'essayer à votre poste (si ce n'est trop demander).

Merci.




Bonjour Stéphan,

Testé dans la version Excel 2003, ceci ferme tous les classeurs issus de la MÊME INSTANCE sans demander à l'usager de sauvegarder
quoi que ce soit :

Application.DisplayAlerts = False
Application.Quit

Le danger de cette méthode est de fermer excel sans avoir l'opportunité de sauvegarder.
À toi de voir !

Tout se ferme même si ces 2 lignes sont inscrites dans un formulaire(userform)


Salutations!






"Stéphan DuQuébec" a écrit dans le message de news:

Bonjour,

Pour les deux commandes suivantes:

ThisWorkbook.Close
ou
Application.Quit

Aucune n'a pour effet de FERMER la fenêtre Excel à la suite de la procédure
(comme le ferait l'action d'appuyer sur le Query Close).

Connaissez-vous la commande utile à le faire.

Merci.





Avatar
michdenis
Bonjour Stéphan,

Si tu éprouves une difficulté avec ta version excel (qu'elle est - elle ? )

Essaie ceci:

Dans un module standard , tu inscris cette procédure :

'--------------------
Sub Test()

Unload Userform1 ' nom à adapter
Application.DisplayAlerts = False
Application.Quit
'--------------------

Et à la fin de ta procédure de ton bouton de commande, tu appelles la procédure "Test" au lieu de ceci : Application.Quit


Salutations!


"Stéphan DuQuébec" a écrit dans le message de news:

Messieurs JLuc & michdenis,

Ma procédure est dans un userform en événement Click de bouton (je ne peux
la mettre en BeforeClose).

La voici:

Private Sub CommandButtonBidon1_Click()

Application.ScreenUpdating = False

Sheets("AlerteMacros").Visible = True
Sheets("Cumulatif 2005").Visible = xlVeryHidden
Sheets("DonnéesBoutons").Visible = xlVeryHidden

ActiveWorkbook.Save
ThisWorkbook.Close
Application.Quit

End Sub

J'ai déjà prévu une validation concernant la possibilité de quitter sans
enregistrer, par mégarde. Pas de problème là-dessus.

Cependant, avec mon actuelle procédure (ci-haut), la fenêtre Excel ne ferme
pas.

Pouvez-vous l'essayer à votre poste (si ce n'est trop demander).

Merci.




Bonjour Stéphan,

Testé dans la version Excel 2003, ceci ferme tous les classeurs issus de la MÊME INSTANCE sans demander à l'usager de sauvegarder
quoi que ce soit :

Application.DisplayAlerts = False
Application.Quit

Le danger de cette méthode est de fermer excel sans avoir l'opportunité de sauvegarder.
À toi de voir !

Tout se ferme même si ces 2 lignes sont inscrites dans un formulaire(userform)


Salutations!






"Stéphan DuQuébec" a écrit dans le message de news:

Bonjour,

Pour les deux commandes suivantes:

ThisWorkbook.Close
ou
Application.Quit

Aucune n'a pour effet de FERMER la fenêtre Excel à la suite de la procédure
(comme le ferait l'action d'appuyer sur le Query Close).

Connaissez-vous la commande utile à le faire.

Merci.





Avatar
Alain
Messieurs JLuc & michdenis,

Ma procédure est dans un userform en événement Click de bouton (je ne peux
la mettre en BeforeClose).

La voici:

Private Sub CommandButtonBidon1_Click()

Application.ScreenUpdating = False

Sheets("AlerteMacros").Visible = True
Sheets("Cumulatif 2005").Visible = xlVeryHidden
Sheets("DonnéesBoutons").Visible = xlVeryHidden

ActiveWorkbook.Save
ThisWorkbook.Close
Application.Quit

End Sub

J'ai déjà prévu une validation concernant la possibilité de quitter sans
enregistrer, par mégarde. Pas de problème là-dessus.

Cependant, avec mon actuelle procédure (ci-haut), la fenêtre Excel ne ferme
pas.

Pouvez-vous l'essayer à votre poste (si ce n'est trop demander).

Merci.





Bonjour Stéphan,

Testé dans la version Excel 2003, ceci ferme tous les classeurs issus de la MÊME INSTANCE sans demander à l'usager de sauvegarder
quoi que ce soit :

Application.DisplayAlerts = False
Application.Quit

Le danger de cette méthode est de fermer excel sans avoir l'opportunité de sauvegarder.
À toi de voir !

Tout se ferme même si ces 2 lignes sont inscrites dans un formulaire(userform)


Salutations!






"Stéphan DuQuébec" a écrit dans le message de news:

Bonjour,

Pour les deux commandes suivantes:

ThisWorkbook.Close
ou
Application.Quit

Aucune n'a pour effet de FERMER la fenêtre Excel à la suite de la procédure
(comme le ferait l'action d'appuyer sur le Query Close).

Connaissez-vous la commande utile à le faire.

Merci.



La fonction thisworkbook.close ferme le classeur avant de quitter excel.


Il faut la supprimer pour ne garder que application.quit

A+


Avatar
JLuc
*Bonjour Stéphan DuQuébec*,

Messieurs JLuc & michdenis,

Ma procédure est dans un userform en événement Click de bouton (je ne peux
la mettre en BeforeClose).

La voici:

Private Sub CommandButtonBidon1_Click()

Application.ScreenUpdating = False

Sheets("AlerteMacros").Visible = True
Sheets("Cumulatif 2005").Visible = xlVeryHidden
Sheets("DonnéesBoutons").Visible = xlVeryHidden

ActiveWorkbook.Save
ThisWorkbook.Close


End sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.Quit
End Sub

Quand tu ferme le classeur, Workbook_BeforeClose() est executee
J'ai déjà prévu une validation concernant la possibilité de quitter sans
enregistrer, par mégarde. Pas de problème là-dessus.

Cependant, avec mon actuelle procédure (ci-haut), la fenêtre Excel ne ferme
pas.

Pouvez-vous l'essayer à votre poste (si ce n'est trop demander).

Merci.




Bonjour Stéphan,

Testé dans la version Excel 2003, ceci ferme tous les classeurs issus de la
MÊME INSTANCE sans demander à l'usager de sauvegarder quoi que ce soit :

Application.DisplayAlerts = False
Application.Quit

Le danger de cette méthode est de fermer excel sans avoir l'opportunité de
sauvegarder. À toi de voir !

Tout se ferme même si ces 2 lignes sont inscrites dans un
formulaire(userform)


Salutations!






"Stéphan DuQuébec" a écrit dans le
message de news:
Bonjour,

Pour les deux commandes suivantes:

ThisWorkbook.Close
ou
Application.Quit

Aucune n'a pour effet de FERMER la fenêtre Excel à la suite de la procédure
(comme le ferait l'action d'appuyer sur le Query Close).

Connaissez-vous la commande utile à le faire.

Merci.







--
JLuc

Pensez a regarder ces sites très bien fait, ce sont des mines de trucs
et astuces !
http://www.excelabo.net
http://jacxl.free.fr/
http://dj.joss.free.fr/
C:Program FilesMicrosoft OfficeOffice1036VBALIST.XLS


Avatar
Stéphan DuQuébec
Merci à tous 4 qui avez proposé une soluce.

D'abord, j'ai une version Excel 2002 (legit au SP3).

Les méthodes conseillées par JLuc & Alain ne fonctionnent pas correctement
chez-moi, sans que je sache pourquoi. La procédure Sub Test de Michdenis par
contre a réglé tous mes tracas.

Je la conserve ainsi.

Bonne journée (ou soirée, c'est selon....) !

Merci !