Discussion :

[marco001]

Bonjour

Je voudrais changer la couleur de la cellule C2
dans la feuille Allemagne - Stats, automatiquement en changant la couleur de la cellule A1 dans la feuille Allemagne - Données...

Voici la sub que j'ai qui ne fonctionne pas:

Code :

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

1
2
3
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Range("$C$2").Interior.ColorIndex = Range("$A$1").Interior.ColorIndex
End Sub

C'est le A1 ou il faudrait que je rajoute la feuille Allemagne - Données
mais je n'y arrive pas.

Merci*à l'avance

[tarnx]

Et comme ça?

Code :

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

Sheets("TaFeuilleDestination").Range("B2").Interior.ColorIndex = Sheets("TaFeuilleSource").Range("A1").Interior.ColorIndex