Как выделить активную ячейку или выделение в 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% и сократите сотни кликов мышью ежедневно!