tisba35
Messages postés20Date d'inscriptionvendredi 9 avril 2004StatutMembreDernière intervention30 juillet 2004
-
27 mai 2004 à 16:52
crenaud76
Messages postés4172Date d'inscriptionmercredi 30 juillet 2003StatutMembreDernière intervention 9 juin 2006
-
27 mai 2004 à 21:50
Bonjour,
je crée actuellement un interface sous excel en vba.
En fait, je souhaite empêcher la fermeture du fichier avec la croix de fermeture
j'ai donc mis cette sous-routine dans la page de code nommé workbook:
Sub Workbook_BeforeClose(Cancel As Boolean)
Cancel = True
End Sub
Ma croix ne fonctionne donc plus, donc cela fonctionne
mais sur un userform, je souhaite utiliser un bouton quitter pour fermer le fichier. Malheureusement, ce bouton ne fonctionne plus. Voici ma sous-routine:
comment activer svp la fermeture de mon fichier avec ce bouton?
J'ai esayé avec le code "cancel=false" mais le programme ne reconnaît pas cette variable!
Ds l'attente d'une réponse, je vous remercie beaucoup d'avance ;)
TISBA35
crenaud76
Messages postés4172Date d'inscriptionmercredi 30 juillet 2003StatutMembreDernière intervention 9 juin 200628 27 mai 2004 à 21:50
Je ne maitrise pas bien VBA, mais une solution est (puisque l'EVT BeforeClose ne semble pas contenir de param UnloadMode comme l'EVT QueryUnload des form VB6) de définir une variable globale, nommée "OnQuitte" par exemplequelque part dans ton code et de la mettre à False au démarrage du projet et de ne la passer à True que dans le code de ton bouton "quitter".
Dans ton Evt BeforeClose(...) tu n'as plus qu'a mettre :