Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2013 Changement de couleur dynamique d'une plage (vba)

speedyloopy

XLDnaute Nouveau
Bonjour à tous,
je suis nouveau sur le forum et novice en vba...

j'ai un problème, je souhaite créer un tableau avec une fonction que quand on clique sur une cellule A2 la plage B2 à G2 changent de couleur et quand je clique sur une cellule plus bas la couleur redevienne normale et la plage du dessous change de couleur (exemple en pièce jointe) ça marche mais je me demandais comment le faire automatique (sans avoir besoin de mettre le numéro de chaque plage) et autre petit problème quand j'essaie de mettre un code rgb pour la couleur, ça ne marche pas...

Pourriez-vous m'aider s'il vous plait?

Meilleures salutations
 

Pièces jointes

  • test vba.xlsm
    14.1 KB · Affichages: 26
  • test vba.xlsm
    14.1 KB · Affichages: 26

phlaurent55

Nous a quittés en 2020
Repose en paix
Re : Changement de couleur dynamique d'une plage (vba)

Bonjour speed.............. et bienvenue sur le forum

remplace ton code par celui-ci
Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Range("B3:G21").Interior.Color = RGB(255, 255, 255)
Range(Cells(Target.Row, 2), Cells(Target.Row, 7)).Interior.Color = RGB(0, 0, 255)
End Sub

à+
Philippe
 

phlaurent55

Nous a quittés en 2020
Repose en paix
Re : Changement de couleur dynamique d'une plage (vba)

Re,

ou plutôt par celui-ci
Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("A2:A21")) Is Nothing Then
Range("B2:G21").Interior.Color = RGB(255, 255, 255)
Range(Cells(Target.Row, 2), Cells(Target.Row, 7)).Interior.Color = RGB(0, 0, 255)
End If
End Sub
à+
Philippe
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…