Bonjour a tous,
je réalise un petit programme, et jeme trouve confronté à un probléme.
Voici mon code
Private Sub VAE1_Click()
If Range("PMoisnum").Value < 1 Then
VAE1 = False
MsgBox "Le mois de Janvier est terminé, il n'est pas possible d'ajouté un virement automatique.", vbInformation
End If
End Sub
quang j'éxécute mon code, le message de msbbox apparait 2 fois.
je ne comprend pas pourkoi.
VEA1 est une chekbox.
Merci de votre aide.
je réalise un petit programme, et jeme trouve confronté à un probléme.
Voici mon code
Private Sub VAE1_Click()
If Range("PMoisnum").Value < 1 Then
VAE1 = False
MsgBox "Le mois de Janvier est terminé, il n'est pas possible d'ajouté un virement automatique.", vbInformation
End If
End Sub
quang j'éxécute mon code, le message de msbbox apparait 2 fois.
je ne comprend pas pourkoi.
VEA1 est une chekbox.
Merci de votre aide.