OVH Cloud OVH Cloud

Une macro pour Quiter sans enregistrer

33 réponses
Avatar
f4crw
Bonjour,

j'utilise cette macro pour sortir d'un classeur sans l'enregistrer, jusqu'i=
ci sans probl=C3=A8me avec Excel 2007 et version pr=C3=A9c=C3=A9dente et av=
ec Windows 7 et ses pr=C3=A9d=C3=A9cesseurs.

Aujourd'hui avec Windows 10 et Excel 2007 :

1_Si cette macro est affect=C3=A9e =C3=A0 une image comme d'habitude
En cliquant sur l'image pour quitter, =C3=A7a me donne : "Microsoft Excel a=
cess=C3=A9 de fonctionner, Windows recherche une solution au probl=C3=A8me=
"
Et =C3=A7a se termine (au mieux) sur un classeur Excel vierge.

Mais, le plus souvent, j'ai : une boite du genre "Microsoft Excel a cess=C3=
=A9 de fonctionner......"
Et fermer le programme

Et je dois cliquer sur Fermer le programme" pour en sortir=E2=80=A6..

2_Si cette macro est affect=C3=A9e =C3=A0 un bouton ou si elle lanc=C3=A9e =
directement, il n'y aucun probl=C3=A8me Excel ferme bien le classeur sans l=
'enregistrer et sans probl=C3=A8me.

Avez-vous une autre commande =C3=A0 me proposer ou avez-vous rencontr=C3=A9=
ce ph=C3=A9nom=C3=A8ne ?

la macro en question : =20

Sub Quiter_sans_enregistrer()
ActiveWindow.Close (False)
End Sub



R=C3=A9gis

10 réponses

1 2 3 4
Avatar
MichD
Bonjour Geo,
Aussi loin que je me souvienne, la fermeture peut se faire dans une seule ligne de code
ActiveWorkbook.Close True Or False selon que l'on désire enregistrer les modifications ou non.
Comme tu le dis, on peut et pouvait le faire en 2 lignes de code.
With ActiveWorkbook
.Saved = True Or False
.Close
End With
Sauf un problème de mémoire de ma part, ces deux méthodes ont toujours existé (1997 à 2016)
MichD
.
Avatar
isabelle
il y a beaucoup de façon de faire,
voici celle que j'utilise,
ActiveWorkbook.Close savechanges:úlse
isabelle
Avatar
Geo
Bonjour Denis
Sauf un problème de mémoire de ma part, ces deux méthodes ont toujours existé
(1997 à 2016)

Tu as raison, ceci a été la méthode préconisée autrefois sur les forums
Microsoft quand le vba est apparu.
Je ne sais pas pourquoi les spécialistes préféraient cette méthode.
A chacun ses gouts, Isabelle fait autrement.
C'est ce qui m'est resté et que j'utilise d'ailleurs dans un autre
langage de programmation.
Éventuellement ça permet de vérifier que le document est bien "saved"
avant de le fermer.
Si ce n'est pas le cas, c'est qu'autre chose interfère.
Avatar
isabelle
bonjour Régis,
as-tu essayer d'affecter la macro à une nouvelle image sur ton fichier problème ?
c'est peut-être juste l'image le problème...
isabelle
Le 2017-01-14 à 11:35, f4crw a écrit :
1_Si cette macro est affectée à une image comme d'habitude
En cliquant sur l'image pour quitter, ça me donne : "Microsoft Excel a cessé de fonctionner, Windows recherche une solution au problème"
Et ça se termine (au mieux) sur un classeur Excel vierge.
Avatar
News.aioe.org
Bonjour Isabelle,
Cela ressemble plus à un bogue - problème de compatibilité entre
Windows 10 et Excel 2007.
Sur ce sujet :
https://support.office.com/fr-fr/article/Quelles-versions-d-Office-fonctionnent-avec-Windows-10-0fc85c97-da69-466e-b2b4-54f7d7275705?ui=fr-FR&rs=fr-FR&ad=FR
MichD
"isabelle" a écrit dans le message de groupe de discussion :
o5emp8$4f6$
il y a beaucoup de façon de faire,
voici celle que j'utilise,
ActiveWorkbook.Close savechanges:úlse
isabelle
Avatar
f4crw
Bonjour Jacquouille
oui jusqu'ici sans problème avec Excel 2003, 2007 et les versions pr écédentes et avec Windows XP et 7 et même ses prédà ©cesseurs je n'est jamais rencontré ce problème.
Merci et bonne journée
Régis
le samedi 14 janvier 2017 18:23:07 UTC+1, Jacquouille a écrit :
Bonsoir
Si cela peut aider, chez moi, avec mon vieux 2003, quand je clique sur le
joli zoizeau de Denis, le doc se ferme illico.
Pffffut, plus d'image et plus de doc. -))
Jacques
" Le vin est au repas ce que le parfum est à la femme."
.
"f4crw" a écrit dans le message de groupe de discussion :
Le samedi 14 janvier 2017 17:11:01 UTC+1, News.aioe.org a écrit :
Moi, cela fonctionne très bien avec Excel 2016. Ça, c'est s ûr!
Clairement, il y a quelque chose que tu ne dis pas.
Désolé, mais il n'y a pas plusieurs lignes de code diffé rentes
pour faire ce travail
'-------------------
j'avais déjà essayé et ça fait pareil avec votre f ichier.
'-------------------
Qu'est-ce que tu veux que je fasse avec ce commentaire? Sois plus
explicite.
Tu peux au moins d'écrire ton environnement de travail, ta version
d'Excel,
où tu as placé la macro? Est-ce le classeur où tu as mis la macro que tu
veux
fermer? L'idéal, si tu le peux, publie ton classeur (ou un classeu r
exemple
avec
lequel tu éprouves ce type de problème en utilisant l'adresse Cjoint.com.
Tu
nous retournes ici l'adresse que tu obtiendras.
MichD

Je ne peut que répéter
"j'utilise cette macro pour sortir d'un classeur sans l'enregistrer,
jusqu'ici sans problème avec Excel 2007 et version précéde nte et avec
Windows 7 et ses prédécesseurs.
Aujourd'hui avec Windows 10 et Excel 2007 :
1_Si cette macro est affectée à une image comme d'habitude
En cliquant sur l'image pour quitter, ça me donne : "Microsoft Excel a cessé
de fonctionner, Windows recherche une solution au problème"
Et ça se termine (au mieux) sur un classeur Excel vierge.
Mais, le plus souvent, j'ai : une boite du genre "Microsoft Excel a cess é de
fonctionner......"
Et fermer le programme
Et je dois cliquer sur Fermer le programme" pour en sortir…..
2_Si cette macro est affectée à un bouton ou si elle lancé e directement, il
n'y aucun problème Excel ferme bien le classeur sans l'enregistrer e t sans
problème."
Le même effet chez un membre du groupe qui tourne lui aussi avec Win dows 10
et Excel 2007 !
Mais ce n'est pas grave, je vais remplacer l'image par un bouton.
Régis
---
L'absence de virus dans ce courrier électronique a été v érifiée par le logiciel antivirus Avast.
https://www.avast.com/antivirus
Avatar
f4crw
Oui c'est ce que j'ai fait après avoir écrit "je vais remplacer l 'image par un bouton" et ça fonctionne très bien.
Je voulais savoir si d'autres que moi ont rencontré ce phénomà ¨ne ?
Bonne journée
Régis
Le samedi 14 janvier 2017 18:58:08 UTC+1, News.aioe.org a écrit :
Une parade si cela t'intéresse : http://www.cjoint.com/c/GAorZOFE5k i
MichD
Avatar
f4crw
Oui isabelle j'ai essayé avec le fichier de MichD et ça fait pare il ça bogue en cliquant sur l'image et pas sur un bouton.
merci
Régis
Le dimanche 15 janvier 2017 15:52:23 UTC+1, isabelle a écrit :
bonjour Régis,
as-tu essayer d'affecter la macro à une nouvelle image sur ton fichi er problème ?
c'est peut-être juste l'image le problème...
isabelle
Le 2017-01-14 à 11:35, f4crw a écrit :
1_Si cette macro est affectée à une image comme d'habitude
En cliquant sur l'image pour quitter, ça me donne : "Microsoft Exc el a cessé de fonctionner, Windows recherche une solution au problà ¨me"
Et ça se termine (au mieux) sur un classeur Excel vierge.
Avatar
JièL
Hello,
pas de pb chez moi avec Excel 2010, 2013 ou 2016, mais comme l'a signalé
MichD, Excel 2007 n'est plus supporté et n'a pas été testé avec Windows 10.
Une question : pourquoi avez vous changé de système d'exploitation ?
ps : Jacquouille, fait bien attention à garder ton ordi en état avec le
système actuel, sinon tu vas avoir des surprises ;-)
--
JièL panipwoblèm
Le 16/01/2017 à 12:23, f4crw a écrit :
Oui c'est ce que j'ai fait après avoir écrit "je vais remplacer l'image par un bouton" et ça fonctionne très bien.
Je voulais savoir si d'autres que moi ont rencontré ce phénomène ?
Bonne journée
Régis
Le samedi 14 janvier 2017 18:58:08 UTC+1, News.aioe.org a écrit :
Une parade si cela t'intéresse : http://www.cjoint.com/c/GAorZOFE5ki
MichD
Avatar
f4crw
Oui il semble que ça bogue entre W10 et xl 2007
"Une question : pourquoi avez vous changé de système d'exploitati on ? " je n'ai pas changé, mais c'est un fichier que je partage avec u n groupe dans une association les membres ont des versions diverses de Win et d'XL.
merci pour votre aide
Régis
Le lundi 16 janvier 2017 12:35:53 UTC+1, JièL a écrit :
Hello,
pas de pb chez moi avec Excel 2010, 2013 ou 2016, mais comme l'a signal é
MichD, Excel 2007 n'est plus supporté et n'a pas été test é avec Windows 10.
Une question : pourquoi avez vous changé de système d'exploitat ion ?
ps : Jacquouille, fait bien attention à garder ton ordi en état avec le
système actuel, sinon tu vas avoir des surprises ;-)
--
JièL panipwoblèm
Le 16/01/2017 à 12:23, f4crw a écrit :
Oui c'est ce que j'ai fait après avoir écrit "je vais remplac er l'image par un bouton" et ça fonctionne très bien.
Je voulais savoir si d'autres que moi ont rencontré ce phénom ène ?
Bonne journée
Régis
Le samedi 14 janvier 2017 18:58:08 UTC+1, News.aioe.org a écrit :
Une parade si cela t'intéresse : http://www.cjoint.com/c/GAorZOF E5ki
MichD
1 2 3 4