Как выделить строку и столбец активной ячейки в Excel?

При работе с большими таблицами может быть сложно отслеживать данные в определенных строках и столбцах. Разве не было бы удобно, если бы при выборе ячейки вся строка и столбец автоматически выделялись? Например, при нажатии на ячейку F11 строка 11 и столбец F будут выделены, что облегчит просмотр данных в контексте. Это руководство проведет вас через два быстрых метода для достижения такого перекрестного выделения в Excel: с использованием кода VBA или надстройки Kutools для Excel.

Выделение строки и столбца активной ячейки с помощью VBA

Выделение строки и столбца активной ячейки с помощью Kutools для Excel

Выделение строки и столбца активной ячейки с помощью VBA

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

1. Нажмите клавиши Alt + F11, чтобы открыть окно Microsoft Visual Basic for Applications.

2. Затем в панели Проект дважды щелкните по листу, к которому хотите применить этот VBA-код, и скопируйте и вставьте следующий код VBA в правое окно скрипта. См. скриншот:

Совет: Если панель Проект скрыта, нажмите Вид > Обозреватель проектов в окне Microsoft Visual Basic for Applications, чтобы отобразить её.

VBA: Перекрестное выделение активной ячейки.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'UpdatebyExtendoffice6/1/2016
    Application.ScreenUpdating = False
    With Target
        .Worksheet.Cells.Interior.ColorIndex = 0
        .EntireRow.Interior.Color = vbYellow
        .EntireColumn.Interior.Color = vbYellow
    End With
    Application.ScreenUpdating = True
End Sub

3. Затем сохраните и закройте VBA, и теперь, когда вы активируете ячейку, её соответствующая строка и столбец будут выделены.

Если вы хотите выделить только активную ячейку, которую выбрали, вы можете использовать следующий VBA-код.

VBA: Выделение активной ячейки, которую вы выбрали

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'UpdatebyExtendoffice6/1/2016
    Application.ScreenUpdating = False
    Target.Worksheet.Cells.Interior.ColorIndex = 0
    Target.Interior.Color = vbYellow
    Application.ScreenUpdating = True
End Sub

Примечание: В приведенных выше VBA-кодах значение ColorIndex можно изменять по вашему желанию.

Выделение строки и столбца активной ячейки с помощью Kutools для Excel

Если вы не знакомы с VBA, вы можете попробовать применить утилиту Чтение макета из Kutools для Excel, чтобы быстро выполнить перекрестное выделение активной ячейки.

После бесплатной установки Kutools для Excel выполните следующие действия:

Нажмите Kutools > Чтение макета чтобы включить утилиту Чтение макета См. скриншот:

Примечание:

1. Нажмите Kutools > Чтение макета снова, чтобы отключить эту утилиту.

2. Нажмите Kutools > Чтение макета > Настройки чтения макета чтобы указать формы, стили и цвета по вашему усмотрению в диалоговом окне Настройки чтения макета См. скриншот:

Совет: Эта утилита применяется ко всей книге.

Демонстрация: Выделение строки и столбца активной ячейки с помощью Kutools для Excel