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 ATTENTION : question mainte fois posée mais...

ATTENTION : question mainte fois posée mais...

14 réponses
Avatar
William
Bonjour à tous,

Je vais en faire bondir certains de poser cette question mais j'ai recherché
sur Excelabo, google and Co et ce que j'ai trouver ne marche pas chez moi.
Mon problème
je voudrais fermer sans l'enregistrer le classeur actif càd que quand je
clique sur la croix de fermeture du fichier ou même d'excel, je ne veux pas
la fenêtre de demande d'enregistrement.

J'ai donc mis cette macro dans ThisWorkBook du fichier actif :

Private Sub Fermer_Sans_Sauver()
ActiveWorkbook.Saved = False
ActiveWorkbook.Close
End Sub

Mais j'ai toujours la demande d'enregistrment!!!

Où est mon erreur ???
Il ne fallait pas mettre cette macro dans le ThisWorkBook de mon fichier ?

Merci pour votre aide

William (un revenant)
Signaler un problème avec ce contenu

4 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
1 2
Avatar
isabelle
bonjour Patrice,

je voie là une bonne raison d'étoffer ta réponse.
du devrait ajouter, suite à ton énoncé, les trois méthode avec explication à chacune, pour le bénéfice de tous,
allez un p'tit effort ;-)
et comme je suis certaine que tu y répondra positivement je met tout de suite un flag pour misange.
merci ! Patrice
bisou*
isabelle


il existe plusieurs façon d'aborder le problème. Soit tu
fais croire à Excel que tu as déjà sauvegardé, soit tu lui
dit de ne pas sauvegarder, soit tu shuntes les messages
(le Displayalerts). Retiens plus cette formulation qui me
semble plus adaptées (que j'ai du trouver il y a longtemps
sur Excelabo... (site INCONTOURNABLE).
Bonne continuation à toi.

Patrice.
-----Message d'origine-----
Bonjour Patrice,

Merci, ca marche comme je veux.

Mais pourquoi l'autre procédure (celle de Pounet) ne
marche pas ?


William

"Patrice" a écrit
dans le message de

news: 1b9701c4cd73$e39173b0$
Salut,

la syntaxe est là :

Private Sub Workbook_BeforeClose(Cancel As Boolean)
ActiveWorkbook.Close savechanges:úlse
End Sub

tu le mets dans Thisworkbook

@+

-----Message d'origine-----
Bonjour à tous,

Je vais en faire bondir certains de poser cette question
mais j'ai recherché

sur Excelabo, google and Co et ce que j'ai trouver ne
marche pas chez moi.

Mon problème
je voudrais fermer sans l'enregistrer le classeur actif
càd que quand je

clique sur la croix de fermeture du fichier ou même
d'excel, je ne veux pas

la fenêtre de demande d'enregistrement.

J'ai donc mis cette macro dans ThisWorkBook du fichier
actif :


Private Sub Fermer_Sans_Sauver()
ActiveWorkbook.Saved = False
ActiveWorkbook.Close
End Sub

Mais j'ai toujours la demande d'enregistrment!!!

Où est mon erreur ???
Il ne fallait pas mettre cette macro dans le ThisWorkBook
de mon fichier ?


Merci pour votre aide

William (un revenant)


.




.






Avatar
Pounet95
Bonsoir Isabelle,
Je suis preneur pour l'étoffement.

Ai-je bien compris ou me gourre-je ?
... faire croire : on force par .Saved=True ?
... dire sauvegarder/ne pas sauvegarder : c'est répondre au message
... shunter : Application.DisplayAlertsúlse mais que se passe-t-il dans
ce cas ?
Il y a sauvegarde ou pas ? Quelle est le bouton pris par défaut : Oui ?
Non ?
Cela dépend du message ?

--
Pounet95
on trouve tout ( ou presque ) http://www.excelabo.net/
"isabelle" a écrit dans le message de news:

bonjour Patrice,

je voie là une bonne raison d'étoffer ta réponse.
du devrait ajouter, suite à ton énoncé, les trois méthode avec explication
à chacune, pour le bénéfice de tous,
allez un p'tit effort ;-)
et comme je suis certaine que tu y répondra positivement je met tout de
suite un flag pour misange.
merci ! Patrice
bisou*
isabelle


il existe plusieurs façon d'aborder le problème. Soit tu
fais croire à Excel que tu as déjà sauvegardé, soit tu lui
dit de ne pas sauvegarder, soit tu shuntes les messages
(le Displayalerts). Retiens plus cette formulation qui me
semble plus adaptées (que j'ai du trouver il y a longtemps
sur Excelabo... (site INCONTOURNABLE).
Bonne continuation à toi.

Patrice.
-----Message d'origine-----
Bonjour Patrice,

Merci, ca marche comme je veux.

Mais pourquoi l'autre procédure (celle de Pounet) ne
marche pas ?


William

"Patrice" a écrit
dans le message de

news: 1b9701c4cd73$e39173b0$
Salut,

la syntaxe est là :

Private Sub Workbook_BeforeClose(Cancel As Boolean)
ActiveWorkbook.Close savechanges:úlse
End Sub

tu le mets dans Thisworkbook

@+

-----Message d'origine-----
Bonjour à tous,

Je vais en faire bondir certains de poser cette question
mais j'ai recherché

sur Excelabo, google and Co et ce que j'ai trouver ne
marche pas chez moi.

Mon problème
je voudrais fermer sans l'enregistrer le classeur actif
càd que quand je

clique sur la croix de fermeture du fichier ou même
d'excel, je ne veux pas

la fenêtre de demande d'enregistrement.

J'ai donc mis cette macro dans ThisWorkBook du fichier
actif :


Private Sub Fermer_Sans_Sauver()
ActiveWorkbook.Saved = False
ActiveWorkbook.Close
End Sub

Mais j'ai toujours la demande d'enregistrment!!!

Où est mon erreur ???
Il ne fallait pas mettre cette macro dans le ThisWorkBook
de mon fichier ?


Merci pour votre aide

William (un revenant)


.




.








Avatar
Patrice
Je me lance ?

à mettre dans Thisworkbook

1ère : Excel ne pose pas la question et ne sauvegarde pas

Private Sub Workbook_BeforeClose(Cancel As Boolean)
ActiveWorkbook.Close savechanges:úlse
End Sub

2nd : Excel considère que tu as déjà sauvegardé le fichier

Private Sub Workbook_BeforeClose(Cancel As Boolean)
ActiveWorkbook.Saved = True
ActiveWorkbook.Close
End Sub

Pour la troisième, le DisplAyalerts ne semble pas accepter
de fonctionner pour la sauvegarde.. où je n'y arrive pas..
désolé de décevoir. (et j'ai pas trop le temps
d'approfondir)

Cela dit, je reste sur ma première impression : je
garderai la première.

Bonne continuation et bien le bonjour à Isabelle.

Patrice

-----Message d'origine-----
bonjour Patrice,

je voie là une bonne raison d'étoffer ta réponse.
du devrait ajouter, suite à ton énoncé, les trois méthode
avec explication à chacune, pour le bénéfice de tous,

allez un p'tit effort ;-)
et comme je suis certaine que tu y répondra positivement
je met tout de suite un flag pour misange.

merci ! Patrice
bisou*
isabelle


il existe plusieurs façon d'aborder le problème. Soit tu
fais croire à Excel que tu as déjà sauvegardé, soit tu
lui


dit de ne pas sauvegarder, soit tu shuntes les messages
(le Displayalerts). Retiens plus cette formulation qui
me


semble plus adaptées (que j'ai du trouver il y a
longtemps


sur Excelabo... (site INCONTOURNABLE).
Bonne continuation à toi.

Patrice.
-----Message d'origine-----
Bonjour Patrice,

Merci, ca marche comme je veux.

Mais pourquoi l'autre procédure (celle de Pounet) ne
marche pas ?


William

"Patrice" a écrit
dans le message de

news: 1b9701c4cd73$e39173b0$
Salut,

la syntaxe est là :

Private Sub Workbook_BeforeClose(Cancel As Boolean)
ActiveWorkbook.Close savechanges:úlse
End Sub

tu le mets dans Thisworkbook

@+

-----Message d'origine-----
Bonjour à tous,

Je vais en faire bondir certains de poser cette
question




mais j'ai recherché
sur Excelabo, google and Co et ce que j'ai trouver ne
marche pas chez moi.

Mon problème
je voudrais fermer sans l'enregistrer le classeur
actif




càd que quand je
clique sur la croix de fermeture du fichier ou même
d'excel, je ne veux pas

la fenêtre de demande d'enregistrement.

J'ai donc mis cette macro dans ThisWorkBook du fichier
actif :


Private Sub Fermer_Sans_Sauver()
ActiveWorkbook.Saved = False
ActiveWorkbook.Close
End Sub

Mais j'ai toujours la demande d'enregistrment!!!

Où est mon erreur ???
Il ne fallait pas mettre cette macro dans le
ThisWorkBook




de mon fichier ?

Merci pour votre aide

William (un revenant)


.




.

.








Avatar
isabelle
:-) merci! Patrice, pour ces explications et d'avoir dissipé toute ambiguïté à ce sujet.

isabelle


Je me lance ?

à mettre dans Thisworkbook

1ère : Excel ne pose pas la question et ne sauvegarde pas

Private Sub Workbook_BeforeClose(Cancel As Boolean)
ActiveWorkbook.Close savechanges:úlse
End Sub

2nd : Excel considère que tu as déjà sauvegardé le fichier

Private Sub Workbook_BeforeClose(Cancel As Boolean)
ActiveWorkbook.Saved = True
ActiveWorkbook.Close
End Sub

Pour la troisième, le DisplAyalerts ne semble pas accepter
de fonctionner pour la sauvegarde.. où je n'y arrive pas..
désolé de décevoir. (et j'ai pas trop le temps
d'approfondir)

Cela dit, je reste sur ma première impression : je
garderai la première.

Bonne continuation et bien le bonjour à Isabelle.

Patrice

-----Message d'origine-----
bonjour Patrice,

je voie là une bonne raison d'étoffer ta réponse.
du devrait ajouter, suite à ton énoncé, les trois méthode
avec explication à chacune, pour le bénéfice de tous,

allez un p'tit effort ;-)
et comme je suis certaine que tu y répondra positivement
je met tout de suite un flag pour misange.

merci ! Patrice
bisou*
isabelle


il existe plusieurs façon d'aborder le problème. Soit tu
fais croire à Excel que tu as déjà sauvegardé, soit tu
lui


dit de ne pas sauvegarder, soit tu shuntes les messages
(le Displayalerts). Retiens plus cette formulation qui
me


semble plus adaptées (que j'ai du trouver il y a
longtemps


sur Excelabo... (site INCONTOURNABLE).
Bonne continuation à toi.

Patrice.
-----Message d'origine-----
Bonjour Patrice,

Merci, ca marche comme je veux.

Mais pourquoi l'autre procédure (celle de Pounet) ne
marche pas ?


William

"Patrice" a écrit
dans le message de

news: 1b9701c4cd73$e39173b0$
Salut,

la syntaxe est là :

Private Sub Workbook_BeforeClose(Cancel As Boolean)
ActiveWorkbook.Close savechanges:úlse
End Sub

tu le mets dans Thisworkbook

@+

-----Message d'origine-----
Bonjour à tous,

Je vais en faire bondir certains de poser cette
question




mais j'ai recherché
sur Excelabo, google and Co et ce que j'ai trouver ne
marche pas chez moi.

Mon problème
je voudrais fermer sans l'enregistrer le classeur
actif




càd que quand je
clique sur la croix de fermeture du fichier ou même
d'excel, je ne veux pas

la fenêtre de demande d'enregistrement.

J'ai donc mis cette macro dans ThisWorkBook du fichier
actif :


Private Sub Fermer_Sans_Sauver()
ActiveWorkbook.Saved = False
ActiveWorkbook.Close
End Sub

Mais j'ai toujours la demande d'enregistrment!!!

Où est mon erreur ???
Il ne fallait pas mettre cette macro dans le
ThisWorkBook




de mon fichier ?

Merci pour votre aide

William (un revenant)


.




.

.










1 2