Expanding on Active Row

I found this code online to highlight my active row and it works as anticipated.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    
    With ThisWorkbook.Names("ActiveRow")
      .Name = "ActiveRow"
      .RefersToR1C1 = "=" & ActiveCell.Row
    End With
    
End Sub

I now want to highlight an additional range of cells based on specific cell content in my active row. Any suggestions?

I know nothing about VBA.

Thank You.