Как подсветить строку и столбец активной ячейки (Автоматическая заливка ячеек Excel)

Иногда может потребоваться выделить цветом всю строку и колонку активной ячейки таблицы Excel, чтобы удобнее было анализировать данные.

Для того чтобы это сделать выполните следующие действия:

1. Сделайте клик правой кнопкой мыши по названию листа (в моем случае это Лист1) и в появившемся меню выберите Просмотр кода. Или нажмите Alt+F11.
2. Убедитесь в том, что в окне Проектов VBA активирован именно тот лист, который вы выбирали.
3. Вставьте в окно редактирования кода VBA следующий код:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    ' Скидання попереднього виділення рядка і стовпця
    Cells.Interior.ColorIndex = 0
    
    ' Перевірка, що вибрано комірку у межах таблиці (не заголовок)
    If Target.Row > 1 And Target.Column > 1 Then
        ' Виділення всього рядка та стовпця, в яких знаходиться обрана комірка
        Rows(Target.Row).Interior.Color = RGB(0,191,255)  ' Колір для рядка
        Columns(Target.Column).Interior.Color = RGB(0,191,255)  ' Колір для стовпця
    End If
End Sub

Видео как выполнить заливку строки и столбца активной ячейки