Как выделить активную ячейку или выделение в Excel?
Если у вас большая таблица, возможно, вам будет сложно сразу найти активную ячейку или активное выделение. Однако, если активная ячейка/выделение будут иметь выделяющийся цвет, найти их не составит труда. В этой статье я расскажу о том, как автоматически выделить активную ячейку или выбранный диапазон ячеек в Excel.
Выделение активной ячейки или выделения с помощью кода VBA
Выделение активной ячейки или выделения с помощью кода VBA
Следующий код VBA поможет вам динамически выделить активную ячейку или выделение, пожалуйста, следуйте инструкциям:
1. Нажмите и удерживайте клавиши ALT + F11, чтобы открыть окно Microsoft Visual Basic for Applications.
2. Затем выберите ThisWorkbook из левого обозревателя проектов, дважды щелкните по нему, чтобы открыть модуль, и скопируйте следующий код VBA в пустой модуль:
Код VBA: Выделение активной ячейки или выделения
Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Excel.Range)
'Update 20140923
Static xLastRng As Range
On Error Resume Next
Target.Interior.ColorIndex = 6
xLastRng.Interior.ColorIndex = xlColorIndexNone
Set xLastRng = Target
End Sub
3. Затем сохраните и закройте этот код, вернитесь к листу. Теперь, когда вы выбираете ячейку или выделение, выбранные ячейки будут выделены, и это выделение будет динамически перемещаться при изменении выбранных ячеек.
Примечания:
1. Если вы не можете найти панель обозревателя проектов в окне, вы можете нажать Вид > Обозреватель проектов в окне Microsoft Visual Basic for Applications, чтобы открыть его.
2. В приведенном выше коде вы можете изменить .ColorIndex = 6 на другой цвет, который вам нравится.
3. Этот код VBA может быть применен ко всем листам в книге.
4. Если в вашей таблице есть раскрашенные ячейки, цвет будет потерян, когда вы кликнете по ячейке, а затем перейдете к другой ячейке.
Связанная статья:
Как автоматически выделять строку и столбец активной ячейки в Excel?
Лучшие инструменты для повышения продуктивности в Office
Повысьте свои навыки работы в Excel с помощью Kutools для Excel и ощутите эффективность на новом уровне. Kutools для Excel предлагает более300 расширенных функций для повышения производительности и экономии времени. Нажмите здесь, чтобы выбрать функцию, которая вам нужнее всего...
Office Tab добавляет вкладки в Office и делает вашу работу намного проще
- Включите режим вкладок для редактирования и чтения в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Открывайте и создавайте несколько документов во вкладках одного окна вместо новых отдельных окон.
- Увеличьте свою продуктивность на50% и уменьшите количество щелчков мышью на сотни ежедневно!
Все надстройки Kutools. Один установщик
Пакет Kutools for Office включает надстройки для Excel, Word, Outlook и PowerPoint, а также Office Tab Pro — идеально для команд, работающих в разных приложениях Office.
- Комплексный набор — надстройки для Excel, Word, Outlook и PowerPoint плюс Office Tab Pro
- Один установщик, одна лицензия — настройка занимает считанные минуты (MSI-совместимо)
- Совместная работа — максимальная эффективность между приложениями Office
- 30-дневная полнофункциональная пробная версия — без регистрации и кредитной карты
- Лучшее соотношение цены и качества — экономия по сравнению с покупкой отдельных надстроек