fermer par bouton

[serge]

bonjour le forum
j'ai inclus à une feuille un bouton de fermeture du fichier. je voudrais 'obliger' l'utilisateur à utiliser ce bouton (calcul de temps de tâches) et donc empêcher 'Fichier/Fermer' et autre icône 'X'. j'ai trouvé sur ce site le verrouillage total de
Private Sub Workbook_BeforeClose(Cancel as Boolean)
Cancel = True
End Sub
est-il possible de l'adapter à mon 'bouton magique' ? Ou alors y a t-il une autre façon de procéder ?

merci d'avance de votre attention et de vos bons conseils,
et bonne fin de journée à tous.
serge.

 

[Luki]

Bonjour Serge,

Un idée comme ça... pourquoi ne pas utiliser justement l'évènement 'BeforeClose' pour mettre à jour ton compteur de temps de tâche?? Si j'ai bien compris la question..

En effet, tu ne pourras pas empêcher un utilisateur de fermer le fichier en enlevant la prise du PC!!!!!!


A +

 

[serge]

luki et le forum
l'idée d'intégrer mon calcul de temps au 'BeforeClose' est très bonne mais je n'y arrive pas. je vais essayer encore une fois... quant à la fermeture 'dirigée', c'est seulement pour que le calcul ne soit pas oublié, pour ne pas pénaliser l'utilisateur du fichier.
merci pour les conseils, bonne soirée à tous

 

[Luki]

Re Serge,

Un Zip serait bienvenu pour t'aider! ( Si tu veux !)

A+