Macro couleur cellules

[bartsho]

Bonjour

Je souhaite colorer automatiquement des cellules de la même couleur que d'autres cellules: j'aimerai qu'a chaque changement de couleur des cellules D1 a d9, alors E1 à E9soient de la même couleur
Comment peut on faire ?

Ci joint: j'ai réussi par une macro, mais
- il faut l'éxecuter à chaque fois: j'aimerai pouvoir juste en cliquant sur une cellule que la couleur soit la même et non en exécutant la macro à chaque fois...
- que sur une seule cellule, or j'aimerais le faire sur toutes...

Merci d'avance

 

[JCGL]

Re : Macro couleur cellules

Bonjour à tous,

Les macro événementielles comme le _SelctionChange et_Change se mettent dans le module de la feuille concernée.

A + à tous

 

[bartsho]

Re : Macro couleur cellules

Merci de ta réponse rapide
néamoins cela ne marche pas : il met en surbrillance jaune dans le module de la feuil1...?


Sub date_a_confirmer()
Dim Rg As Range
With Worksheets("Feuil1")
.Range("e9").Interior.Color = .Range("d9").Interior.Color
End With
End Sub
'-----------------------------------------
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = Range("d9").Address Then
Range("e9").Interior.Color = Range("d9").Interior.Color
End If
End Sub

'-----------------------------------------
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Rg Is Nothing Then Set Rg = ActiveCell
If Rg.Address = Range("d9").Address Then
Range("e9").Interior.Color = Rg.Interior.Color
End If
Set Rg = Target
End Sub
'-----------------------------------------

 

[JCGL]

Re : Macro couleur cellules

Bonjour à tous,

Voir le fichier joint avec une partie de ton code mais bien placé dans le bon module.

A + à tous

 

[bartsho]

Re : Macro couleur cellules

Merci!!
par contre il faut relancer la macro a chaque fois
n y a t il pas moyen que cela se fasse automatiquement dès le changement de couleur de la cellule? sans executer macro ?

Merci d'avance

 

[JCGL]

Re : Macro couleur cellules

Bonjour à tous,

Eh non...

Mets une couleur en E et mets une valeur...

A + à tous

 

[Fo_rum]

Re : Macro couleur cellules

Bonsoir,

une autre façon de faire.

 

[bartsho]

Re : Macro couleur cellules

Merci bcp. un double clique c'est pas mal!

 

[bartsho]

Re : Macro couleur cellules

Bonjour

Comment appliquer cette macro (fichier que vous m'avez renvoyé sur une plage de cellules sources (exemple: colonne D ou D3 à D17; ou colonne C ou C3 à C17 ) ?

Merci bcp!!