Highlight Active Row

[norts55]

Hello Everyone,
I have an older spread sheet that has a lot of columns and it is hard to follow the same row from one side to the other. Doing a web search, I found code to highlight the active row in excel. This pretty much does what I want but the problem is, the undo and redo functions seem to not be active when I am using this code. Does anyone know how to modify this code to keep the undo and redo or does anyone have other code that will gives this result but keeps the undo and redo functions active? Maybe there is a better way all together, I am open to anything. Thanks in advance.


Here is the link where the code:

How to Highlight Active Row in Excel (3 Methods) - ExcelDemy

You can highlight active row in Excel by applying Conditional formatting, by using a VBA code or by using both Conditional formatting and VBA

www.exceldemy.com

Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)

Static xRow

If xRow <> "" Then
    With Rows(xRow).Interior
        .ColorIndex = xlNone
    End With
End If

Active_Row = Selection.Row
xRow = Active_Row
With Rows(Active_Row).Interior
    .ColorIndex = 8
    .Pattern = xlSolid
End With

End Sub

 

[Candyman8019]

The method I typically use is to add the following to the sheet where you want the active row/col highlighted:

Private Sub Worksheet_SelectionChange(ByVal target As Range)
If Application.CutCopyMode = False Then
On Error Resume Next
Application.Calculate
End If
End Sub

Then set up conditional formatting for the affected range using the following formula and setting a fill color:
=OR(CELL("COL")=COLUMN(),CELL("row")=ROW())

 

[norts55]

That works. Thank you!