Excel - Highlight the active row

Ask a question

This little function highlights the row where the cursor is currently located.

Add in a module sheet:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Static AncAdress As Long
'If the function activation / deactivation is implemented add the line below

if ActivationLine then exit sub

If Target.Count > 1 Then Exit Sub
If AncAdress <> 0 Then ' restore to normal
Rows(AncAdress).Interior.ColorIndex = xlNone
Rows(AncAdress).Font.ColorIndex = 0
End If
Target.EntireRow.Font.ColorIndex = 6
Target.EntireRow.Interior.ColorIndex = 3
Target.EntireRow.Interior.Pattern = xlSolid
AncAdress = Target.Row
End Sub

Add to a general module (e.g Module1)

If you want to activate/deactivate the function:
  • Or put a button on the macro
  • Or put a shortcut

The current row will be highlighted by default, click on the button or shortcut to change its status:
Public ActivationLigne as boolean 
Sub Activate()
ActivationLigne = not ActivationLigne
end sub
Jean-François Pillou

Jean-François Pillou - Founder of CCM
Better known as Jeff, Jean-François Pillou is the founder of CommentCaMarche.net. He is also CEO of CCM Benchmark and digital director at the Figaro Group.

Learn more about the CCM team