Измените цвет курсора в Excel

Содержание

Вопрос или проблема
Мне нужно изменить цвет курсора
Подсветка активной ячейки
Ответ или решение
Проблема изменения цвета курсора
Решение с помощью макросов
Объяснение кода
Ограничения
Альтернативное решение: Надстройка RowLiner
Заключение

Вопрос или проблема

Мне нужно изменить цвет курсора; я едва вижу свой (в настоящее время светло-зеленый). Я пробовал Темы, Цвет, Эффекты на вкладке Макета страницы без успеха. Любые идеи будут очень признательны.

Мне нужно изменить цвет курсора

Вы можете использовать код (“Подсветка активной ячейки”) ниже.

Однако есть один недостаток:

Есть один большой недостаток, а именно то, что эта техника будет использовать нечто, называемое “Процедуры событий”, что означает, что макрос будет срабатывать каждый раз, когда вы перемещаете курсор, – и каждый раз, когда срабатывает макрос, он будет очищать ваш стек отмены. Так что да, это возможно, но вы потеряете возможность отмены.

Источник Можно ли изменить цвет ‘курсора’ или ‘контурной ячейки’ в Excel?

Адд-ин RowLiner (от того же автора, что и код ниже) также выглядит интересно. Этот адд-ин имеет ту же проблему с отменой:

RowLiner отключит функцию отмены. Это ограничение, налагаемое основной конструкцией Excel, и его нельзя изменить.

Подсветка активной ячейки

Если вы хотите, чтобы активная ячейка отображалась в специальном цвете, используйте следующий код в событии Workbook_SheetSelectionChange рабочей книги.
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object,
    ByVal Target As Excel.Range)
    Static OldRange As Range
    On Error Resume Next
    Target.Interior.ColorIndex = 6 ' желтый - измените по необходимости
    OldRange.Interior.ColorIndex = xlColorIndexNone
    Set OldRange = Target
End Sub
Это изменит цвет фона у ActiveCell на желтый каждый раз, когда вы выбираете новую ячейку, будь то с помощью мыши или стрелок на клавиатуре.

ПРИМЕР: Эта техника была существенно улучшена в моем адд-ине RowLiner. Я настоятельно рекомендую использовать RowLiner вместо этого.

Источник Подсветка активной ячейки

Ответ или решение

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

Проблема изменения цвета курсора

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

Решение с помощью макросов

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

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Excel.Range)
    Static OldRange As Range
    On Error Resume Next
    Target.Interior.ColorIndex = 6 ' желтый - измените по необходимости
    OldRange.Interior.ColorIndex = xlColorIndexNone
    Set OldRange = Target
End Sub

Объяснение кода

Static OldRange: переменная для хранения предыдущей активной ячейки.
On Error Resume Next: игнорирует ошибки, чтобы код выполнялся без прерываний.
Target.Interior.ColorIndex = 6: меняет цвет фона активной ячейки на желтый. Вы можете изменить значение 6 на другой индекс цвета, чтобы выбрать более подходящий для вашего зрения.
OldRange.Interior.ColorIndex = xlColorIndexNone: сбрасывает цвет фона прежней активной ячейки, чтобы она не оставалась выделенной.

Ограничения

Важно отметить, что использование макросов в Excel приводит к следующему ограничению: при каждом выполнении макроса очищается стек отмены ("undo stack"). Это означает, что вы потеряете возможность отменить свои действия после выполнения макроса. Это значит, что, хотя метод может быть полезным, он требует внимательного подхода при работе.

Альтернативное решение: Надстройка RowLiner

Однако, если вы хотите избежать использования сложных макросов, вы можете рассмотреть возможность использования надстройки RowLiner. Эта надстройка предоставляет более интуитивно понятные функции для выделения активной ячейки, а также поддерживает похожие операции, как и описанный выше макрос.

Обратите внимание, что надстройка RowLiner также имеет ограничение по отключению функции "отмена" в Excel, поэтому важно учитывать это при выборе метода.

Заключение

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