Как сделать в excel подсветку активной ячейки

Координатное выделение строки и столбца

Описание проблемы

Мне часто приходится работать с "широкими" таблицами, которые не помещаются на экран. Поэтому при перемещении влево вправо глаза теряют текущую строку. Ее приходится долго искать и перепроверять в правильную ли строку вводятся данные. Чтобы этого избежать можно подсвечивать активную строку и столбец. Сделать это удобно с помощью надстройки VBA-Excel.

Вот так работает эта функция.

Как включить подсветку текущей строки и столбца

Координатное выделение включается очень просто: перейдите на вкладку надстройки VBA-Excel и в меню Подсветка выберите Включить перекрестное выделение.

Подсветка автоматически будет работать во всех книгах и на всех листах до тех пор пока вы не нажмете команду Отключить перекрестное выделение или не закроете книгу.

Настройки выделения

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

Здесь можно указать подсвечивать ли строки и столбцы вместе или по отдельности.

Можно отдельно указать цвет заливки и шрифта.

Нажмите Сохранить и программа запомнит настройки.

Как сделать в excel подсветку активной ячейки

Подскажите, как в екселе подсветить активную ячейку? Задача еще в том, чтобы после снятия фокуса восстанивить в данной ячейке прежний формат (цвет).

В vba выполняется код (нашел в и-нете):

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
On Error Resume Next

все работает так, как надо, но при потере фокуса исходный цвет ячейки теряется, подскажите, плз, как этого избежать.

Пример — была красная ячейка, при получении фокуса она становится желтой (подсвечивается), при потере фокуса она опять должна стать красной.

Ссылка на основную публикацию