XL 2019 Double click et couleur

aziz

XLDnaute Occasionnel
Bonsoir à tous,
Dans mon fichier j'ai une formule par double click me permettant afficher 3 couleurs différentes pour mon produits A colonnes I à L
et la même chose pour mon produit B colonnes N à R.
Par contre pour mon produit C colonnes T à V, j'ai une couleur ou rien.

Cela fonctionne mais je penses qu'il y un beug.
comment l'améliorer pour ne pas dépendre de la condition des 3 couleurs pour les produits A et B

Merci pour votre Aide
 

Pièces jointes

  • Click couleur2.xlsm
    15.8 KB · Affichages: 14

sylvanu

XLDnaute Barbatruc
Supporter XLD
Bonsoir Aziz,
Votre macro fait exactement ce que vous lui demandez de faire.
En particulier la seconde partie où vous lui demandez de swapper uniquement la zone T:V sur deux couleurs.
Je l'ai mise en commentaires et tout semble être rentré dans l'ordre.
VB:
 'If Intersect(Target, ([T:V])) Is Nothing Then Exit Sub
 ' Application.EditDirectlyInCell = False
 'Select Case Target.Interior.ColorIndex
 'Case Is = xlNone 'Rien
 'Target.Interior.ColorIndex = 43 'vert
 'Case Is = 43 'si la cellule est verte
 'Case Else
 'Target.Interior.ColorIndex = xlNone
 'End Select
 

Pièces jointes

  • Click couleur2.xlsm
    15 KB · Affichages: 6

Discussions similaires

Réponses
4
Affichages
223
Réponses
1
Affichages
152