Macro activée au changement d'une cellule selon une autre condition

Bonjour

J'ai une cellule R5 dans laquelle j'écris une donnée.

Puis, si j'effectue un changement dans la cellule R6 une macro s'active (la suivante):

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Address = "$R$6" Then

    If Sheets("General").Range("R5") = " " Then

MsgBox "NOTHING HAPPEN"
Exit Sub

ElseIf Sheets("General").Range("R5") <> " " Then
       MsgBox "MACRO DO SOMETHING"

    End If
    End If
   end sub 
    

J'essaie de faire 1 sous-condition, c'est-à-dire si je change la valeur de la cellule R6 ET aussi si la cellule R5 est vide, alors la macro s'arrête.

Et seulement si la cellule R5 contient une valeur, alors lorsque je change la valeur de R6, seulement alors, la macro s'active au changement (msgBox Macro do something).

J'ai essayé plein de choses, mais sans succès- dans tous les cas, même si la cellule R5 est vide la macro s'active dès que je change la cellule R6...

Qui peut m'aider SVP?

Bonjour,

Ta macro peut-être simplifiée de cette façon: Ne faire quelque chose que si il y a du changement dans la cellule R6 ET que la cellule R5 n'est pas vide, ce qui donne:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$R$6" And Range("R5") <> "" Then
    MsgBox "MACRO DO SOMETHING"
End If
End Sub

Dans un programme, ça ne sert à rien de dire: "si il y a ça tu ne fais rien", il ne faut faire des tests que si tu comptes effectuer quelque chose si les conditions sont remplies

merci BEAUCOUP!