problem de fermeture avec Workbook_BeforeClose

[lionelC]

Bonjour a tous,

je suis nouveau sur ce forum, depuis quelque temps je travail sur Excel et j'ai suivi des formations EXCEL et VBA.
mais j'ai encore beaucoup a apprendre car le domaine est vaste......

voici mon problème, j'utilise la commande
"Private Sub Workbook_BeforeClose(Cancel As Boolean)"

Mais dans ma routine a un certain moment ou la condition requise n'est pas remplie je veux arrêter le processus j'ai beau mettre des "END, EXIT SUB.." rien n'y fait le fichier ce ferme malgré tout.
si l'un d'entre vous peux me donner un coup de pouce je suis preneur.

Cordialement.

 

[gilbert_RGI]

Re : problem de fermeture avec Workbook_BeforeClose

Bonjour

essayez ceci

Private Sub Workbook_BeforeClose(Cancel As Boolean)
    If [a1] = 10 Then

        MsgBox " le fichier ne sera pas fermé"

        Cancel = True
    Else
        MsgBox " le fichier sera fermé"
        Cancel = False
    End If

End Sub

en mettant dans la cellule A1 la valeur 10 et fermez le fichier
puis changez ensuite cette valeur et fermez le fichier

Salutations

Gilbert_RGI

 

[lionelC]

Re : problem de fermeture avec Workbook_BeforeClose

Merci Gilbert
ça fonctionne bien mais maintenant il faut que je le met en place dans ma macro car j'ai en retour des messages d'erreurs mais bon je vais m'en sortir.

encore merci
Cordialement.

Lionel