Cellule changement de couleur

A

apdf1

XLDnaute Impliqué

• 21 Octobre 2011

• #2

Re : Cellule changement de couleur

Bonjour Jean-marcel

Fichier Xls.

@+

Max

 

Vote positif 0 Vote négatif

A

apdf1

XLDnaute Impliqué

• 21 Octobre 2011

• #3

Re : Cellule changement de couleur

Re,

Je te remercie, mais j'aimerais que lorsque je clic sur une autre cellule de la partie verte que la première cellule se remette a la couleur initiale automatiquement que la je suis obligé de recliquer pour revenir a la couleur initiale.....

Au départ j'avais ceci

Code:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column < 11 Or Target.Column > 25 Or Target.Count > 1 Or Target.Row < 4 Or Target.Row > 50 Then Exit Sub
Columns(6).Cells.Interior.ColorIndex = xlNone
Cells(Target.Row, 6).Interior.ColorIndex = 3
End Sub

Mais le probléme est que j'avais toute la colonne " F"en blanc

Je te remercie

Max

 

Dernière édition: 21 Octobre 2011

Vote positif 0 Vote négatif

A

apdf1

XLDnaute Impliqué

• 21 Octobre 2011

• #4

Re : Cellule changement de couleur

Re,

Sur le dernier que tu ma envoyer message d erreur

Code:

If Cells(LignePrécedente, 6).Interior.ColorIndex = 3 Then

Je vais essayé d'expliquer autrement:

Quand je clic dans la partie verte ex: "Q11" , "F11" devient rouge aprés

Quand je clic sur "R15" "F15" devient rouge et "F11" doit reprendre sa couleur initiale.

@+

Max

 

Vote positif 0 Vote négatif

A

apdf1

XLDnaute Impliqué

• 21 Octobre 2011

• #5

Re : Cellule changement de couleur

Re,

Super! je savais bien que l'ont n'arriverai à nos fin... Je te remercie infiniment
et te souhaite une bonne soirée

@+

Max

 

Vote positif 0 Vote négatif