Ligne active en jaune

Comment repérer facilement la ligne où se trouve le curseur?

Essaye cette procédure à recopier dans le module de la feuille qui t'intéresse (clic droit sur son onglet puis 'Visualiser le code'). Elle surligne en jaune la ligne de la cellule active lorsqu'on la déplace avec les flèches haut et bas :

Private sub Worksheet_SelectionChange(ByVal Target As Range)
 Target(0).EntireRow.Interior.ColorIndex = xlNone
 Target.EntireRow.Interior.ColorIndex = 6
 Target(2).EntireRow.Interior.ColorIndex = xlNone
 end sub

Dans la feuille de code de l'onglet où tu désires cette proc.

Private sub Worksheet_SelectionChange(ByVal Target As Range)
 Application.ScreenUpdating = False
  Cells.Interior.ColorIndex = xlNone
  With ActiveCell
    .EntireRow.Interior.ColorIndex = 36
 '     et si tu veux ajouter la sélection de la colonne
 '    .EntireColumn.Interior.ColorIndex = 36
  End With
 end sub

Une autre approche, illustrée par Philippe Cochard dans cet exemple permet de faire varier la couleur de la ligne et de la colonne de la cellule active en fonction de la zone dans laquelle elle se trouve.

Auteur :

Mots clefs associés à cette page : , , ,

Copier coller

C'est génial !

cependant on perd la possibilité de faire un copier coller

JEC

Nouveau

1 Nouvelle page ajoutée ce mois-ci dont :

Mises à jour

3 pages modifiées ce mois-ci dont :