Excel подсветка строки

Выделяет строку мороз VBA
 avatar
user_2065311
vbscript
a month ago
309 B
2
Indexable
Never
в Excel в условном форматировании формула

=И(СТРОКА(A3)=ЯЧЕЙКА("строка");$H$1="вкл")

'Добавляем макрос
Private Sub WorkSheet_SelectionChange(ByVal Target As Range)
   If Target.Cells.Count > 1 Then Exit Sub
   ActiveCell.Calculate
End Sub