OVH Cloud OVH Cloud

Empêcher la fermerture de la feuille Excel par la croix

3 réponses
Avatar
Crel
Bonjour à toutes et tous.
Je désire qu'il soit impossible pour un utilisateur de quitter avec la croix
un document,
mais qu'il soit obligé de quitter par le bouton macro.
Merci beaucoup.
Patrick.

3 réponses

Avatar
Crel
Merci beaucoup, j'ai un peu de mal à comprendre.
Patrick

"ru-th" a écrit dans le message de news:
uRpn$
Salut Patrick

en supposant que ton document soit une feuille et non un userform (sinon,
on

complètera)
dans l'évenement beforeclose
cancel=zaza

en haut d'un module standard
public zaza as boolean

à l'ouverture évenement open
zaza=true

dans le code de ton bouton
zazaúlse


a+
rural thierry
Veaux et Broutards d'Anjou
Wicasa on kin nape yapi inahni yo
"Crel" a écrit dans le message de news:
#
Bonjour à toutes et tous.
Je désire qu'il soit impossible pour un utilisateur de quitter avec la
croix

un document,
mais qu'il soit obligé de quitter par le bouton macro.
Merci beaucoup.
Patrick.









Avatar
ru-th
re-
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Cancel = zaza
End Sub

dans l'évenement beforeclose de thisworbook
cancel=true empêchera la fermeture d'excel et par une variable, on gère les
deux états possibles (true, on ne ferme pas et false, on peut fermer)
cette variable étant déclaré en public, elle conservera sa valeur et sera
disponible depuis toutes les macros

donc au démarrage, zaza (notre variable) est égale à true (dans l'évenement
open de thisworkbook)
la seule possibilité de quitter est donc de transformer notre zaza
initialisé en true, en false d'où une ligne de code dans la macro lié à ton
bouton
zazaúlse
tant qu'on cliquera pas sur ton bouton, on ne pourra pas sortir du classeur,
ni d'excel d'ailleurs

a+
rural thierry
Veaux et Broutards d'Anjou
Wicasa on kin nape yapi inahni yo
"Crel" a écrit dans le message de news:
eQW#
Merci beaucoup, j'ai un peu de mal à comprendre.
Patrick

"ru-th" a écrit dans le message de news:
uRpn$
Salut Patrick

en supposant que ton document soit une feuille et non un userform
(sinon,


on
complètera)
dans l'évenement beforeclose
cancel=zaza

en haut d'un module standard
public zaza as boolean

à l'ouverture évenement open
zaza=true

dans le code de ton bouton
zazaúlse


a+
rural thierry
Veaux et Broutards d'Anjou
Wicasa on kin nape yapi inahni yo
"Crel" a écrit dans le message de
news:


#
Bonjour à toutes et tous.
Je désire qu'il soit impossible pour un utilisateur de quitter avec la
croix

un document,
mais qu'il soit obligé de quitter par le bouton macro.
Merci beaucoup.
Patrick.













Avatar
Crel
Merci beaucoup Ru-th.
Patrick.

"ru-th" a écrit dans le message de news:
#BCyS#
re-
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Cancel = zaza
End Sub

dans l'évenement beforeclose de thisworbook
cancel=true empêchera la fermeture d'excel et par une variable, on gère
les

deux états possibles (true, on ne ferme pas et false, on peut fermer)
cette variable étant déclaré en public, elle conservera sa valeur et sera
disponible depuis toutes les macros

donc au démarrage, zaza (notre variable) est égale à true (dans
l'évenement

open de thisworkbook)
la seule possibilité de quitter est donc de transformer notre zaza
initialisé en true, en false d'où une ligne de code dans la macro lié à
ton

bouton
zazaúlse
tant qu'on cliquera pas sur ton bouton, on ne pourra pas sortir du
classeur,

ni d'excel d'ailleurs

a+
rural thierry
Veaux et Broutards d'Anjou
Wicasa on kin nape yapi inahni yo
"Crel" a écrit dans le message de news:
eQW#
Merci beaucoup, j'ai un peu de mal à comprendre.
Patrick

"ru-th" a écrit dans le message de news:
uRpn$
Salut Patrick

en supposant que ton document soit une feuille et non un userform
(sinon,


on
complètera)
dans l'évenement beforeclose
cancel=zaza

en haut d'un module standard
public zaza as boolean

à l'ouverture évenement open
zaza=true

dans le code de ton bouton
zazaúlse


a+
rural thierry
Veaux et Broutards d'Anjou
Wicasa on kin nape yapi inahni yo
"Crel" a écrit dans le message de
news:


#
Bonjour à toutes et tous.
Je désire qu'il soit impossible pour un utilisateur de quitter avec
la




croix
un document,
mais qu'il soit obligé de quitter par le bouton macro.
Merci beaucoup.
Patrick.