tribalspidal
XLDnaute Nouveau
salut
j'ai un petit probleme
j'ai deux cellules a1 et b1
quand elles sont differentes
je veux afficher une boite de dialogue qui indique que les valeurs doivent etre identique
le code qui se trouve en dessous marche mais je voudrais afficher la boite de dialogue qu"une seule fois car le message apparait a chaque fois que je selectionnes une cellule
je voudrais mettre qu'un avertissement
Private Sub Worksheet_Change(ByVal Target As Range)
If Range("a1") <> Range("b1") Then
MsgBox "Les valeurs doivent etre identique"
End If
End Sub
j'ai un petit probleme
j'ai deux cellules a1 et b1
quand elles sont differentes
je veux afficher une boite de dialogue qui indique que les valeurs doivent etre identique
le code qui se trouve en dessous marche mais je voudrais afficher la boite de dialogue qu"une seule fois car le message apparait a chaque fois que je selectionnes une cellule
je voudrais mettre qu'un avertissement
Private Sub Worksheet_Change(ByVal Target As Range)
If Range("a1") <> Range("b1") Then
MsgBox "Les valeurs doivent etre identique"
End If
End Sub