VBA macro auto-activation
Résolu
Bonjour,
j'ai créé cette macro
Sub couleur()
If Range("B34") <> "" Then
Range("C4:E5").Interior.color = RGB(0, 255, 0)
Else
Range("C4:E5").Interior.color = RGB(255, 0, 0)
End If
If Range("B34") = "" Then
Range("C6:E7").Interior.color = RGB(255, 0, 0)
End If
End Sub
j'aimerai quelle s'active toute seul
j'ai créé cette macro
Sub couleur()
If Range("B34") <> "" Then
Range("C4:E5").Interior.color = RGB(0, 255, 0)
Else
Range("C4:E5").Interior.color = RGB(255, 0, 0)
End If
If Range("B34") = "" Then
Range("C6:E7").Interior.color = RGB(255, 0, 0)
End If
End Sub
j'aimerai quelle s'active toute seul
1 réponse
-
Bonjour,
Code a mettre dans le VBA de votre feuille.
Private Sub Worksheet_selectionChange(ByVal Target As Range)
If Range("B34") <> "" Then
Range("C4:E5").Interior.Color = RGB(0, 255, 0)
Else
Range("C4:E5").Interior.Color = RGB(255, 0, 0)
Range("C6:E7").Interior.Color = RGB(255, 0, 0)
End If
End Sub
Bonne suite
