Colorer ligne d'une cellule active avec une MFC
Remi2236
Messages postés
86
Date d'inscription
Statut
Membre
Dernière intervention
-
Mike-31 Messages postés 18405 Date d'inscription Statut Contributeur Dernière intervention -
Mike-31 Messages postés 18405 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour,
J'ai fais un tableau sous excel 2010. J'ai fais une MFC pour qu'il y ait une ligne sur deux qui soit grisée.
J'aimerais faire sur VBA une macro pour que lorsque je clique sur une cellule, la ligne qui comporte cette cellule soit colorée entre telle et telle colonne.
Merci d'avance !
J'ai fais un tableau sous excel 2010. J'ai fais une MFC pour qu'il y ait une ligne sur deux qui soit grisée.
J'aimerais faire sur VBA une macro pour que lorsque je clique sur une cellule, la ligne qui comporte cette cellule soit colorée entre telle et telle colonne.
Merci d'avance !
A voir également:
- Colorer ligne d'une cellule active avec une MFC
- Aller à la ligne dans une cellule excel - Guide
- Comment colorer une cellule excel avec une formule si - Guide
- Partager photos en ligne - Guide
- Bloquer une cellule excel - Guide
- Mètre en ligne - Guide
3 réponses
Bonjour,
je n'ai pas tout compris, mais colle ce code dans les propriétés de la feuille concernée (ce code traite la plage A4:O28, à adapter)
je n'ai pas tout compris, mais colle ce code dans les propriétés de la feuille concernée (ce code traite la plage A4:O28, à adapter)
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
With Target
If Not Intersect([A4:O28], Target) Is Nothing And .Count = 1 Then
[A4:O28].Interior.ColorIndex = xlNone
Range(Cells(.Row, 1), Cells(.Row, 14)).Interior.ColorIndex = 36
End If
End With
End Sub
Remi2236
Messages postés
86
Date d'inscription
Statut
Membre
Dernière intervention
1
Bonjour et merci de répondre ;) Il me marque erreur de compilation : End If sans bloc If
Remi2236
Messages postés
86
Date d'inscription
Statut
Membre
Dernière intervention
1
Non j'ai beau refaire, il me marque la même chose en colorant private sub worksheet_selectionchange (byval target as range) en jaune et end if en bleu
Re,
impossible, contrôle le code, tu dois avoir un If et pour sortir un End if
comme dans mon code, ou tu as ajouté un If
A+
Mike-31
Une période d'échec est un moment rêvé pour semer les graines du savoir.
impossible, contrôle le code, tu dois avoir un If et pour sortir un End if
comme dans mon code, ou tu as ajouté un If
A+
Mike-31
Une période d'échec est un moment rêvé pour semer les graines du savoir.