Discussion :

[volubiliss]

Bonjour

J'aimerai savoir comment l'on procède pour déclarer plusieurs cellules pour un évenement type worksheet change.
Sur une feuille excel je voudrai que lorsque l'on modifie la cellule A1 OU la cellule A2 celle ci (la cellule modifiée) change de couleur
comment arriver à un résultat à partir d'un

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Private Sub Worksheet_Change(ByVal Target As Range)

Merci d'avance

[SfJ5Rpw8]

Bonjour,

tu ne précise pas le nombre de cellules concernées ni comment tu effectue le choix de la couleur...

tiens pour le principe un exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Private Sub Worksheet_Change(ByVal Target As Range)
  Dim c As Range
  Set c = Intersect(Target, Me.Range("A1"))
  If Not c Is Nothing Then c.Interior.Color = vbRed
  Set c = Intersect(Target, Me.Range("A2"))
  If Not c Is Nothing Then c.Interior.Color = vbGreen
End Sub

[volubiliss]

désolé pour le manque de précision, merci pour l'exemple ca me donne une bonne base de départ pour parvenir à la solution