XL 2021 mise en forme conditionnelle des cellules quand une autre est sélectionnée

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

marco22

XLDnaute Occasionnel
Bonjour
J'aimerai mettre en surbrillance des cellules quand une cellule est sélectionnée
J'ai créer un fichier carré magique que je vous joins
Je voudrai que quand je sélectionne la cellule H7 les cellules J7, K7, L7, M7 soient surlignées ainsi que les cellules correspondantes dans le carré magique (cellules B2:E5) et cela pour toutes les cellules de la colonne de H7 à H32.
Je ne sais pas si j'ai été clair dans mon explication.
merci
 

Pièces jointes

VB:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
[B2:E5,J7:M32].Interior.ColorIndex = xlNone 'RAZ
[B2:E5,J7:M32].Font.ColorIndex = xlAutomatic 'RAZ
If Intersect(ActiveCell, [H7:H32]) Is Nothing Then Exit Sub
With Union(Range(ActiveCell(1, 2)).Offset(1, 1), ActiveCell(1, 3).Resize(, 4))
    .Interior.Color = vbBlue 'bleu
    .Font.Color = vbWhite 'police blanche
End With
End Sub
 

Pièces jointes

- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

L
Réponses
4
Affichages
644
Liorzherezh
L
Réponses
9
Affichages
1 K
Retour