Highlighting Rows in Protected worksheet

[AKMAKM]

I am using a highlight active row on my worksheet by VBA code :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("a8:cu200")) Is Nothing Then
Range("cx5").Value = Target.Row
End If
End Sub

And using the conditional formatting rules manager :

Unfortunately when I protect the sheet with password "1234" from Review section (protect sheet) , I get the below message and the highlight row order stopped to work

Thank you in advance to help me to solve this issue.

 

[mumps]

Try:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Not Intersect(Target, Range("a8:cu200")) Is Nothing Then
        ActiveSheet.Unprotect Password:="1234"
        Range("cx5").Value = Target.Row
        ActiveSheet.Protect Password:="1234"
    End If
End Sub

Do you actually need to highlight the row using conditional formatting? The macro could do that for you without the need for conditional formatting.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Not Intersect(Target, Range("a8:cu200")) Is Nothing Then
        ActiveSheet.Unprotect Password:="123"
        Rows(Target.Row).Interior.ColorIndex = 6
        ActiveSheet.Protect Password:="123"
    End If
End Sub

 

[BSALV]

if you add this in Thisworkbook, save the workbook, close and reopen, VBA can do everything without password

Private Sub Workbook_Open()
     Sheets("mySheet").Protect Password:="123", userinterfaceonly:=True
End Sub

 

[AKMAKM]

Thank you gentlemen for your kind help and assistance.
The VBA code work perfectly. ?

 

[mumps]

Glad to help.