Страницы: 1
RSS
Подсвечивание строки и столбца до/на пересечения с активной ячейкой
 
Добрый день, как реализовать подсвечивание строки/столбца активной ячейки, когда в экселе выбирается какая либо ячейка то он автоматом выделяет затенением номера строки/столбца но только по краю листа, как подсветить всю часть строки/столбца до пересечения с активной ячейкой. В примере выбрана ячейка С14 и соответственно подсвечивается "С" и "14", а хотелось бы или как для ячейки F10 или как для H19
 
полагаю и в примерах есть не смотрел, но тема не нова.
при использовании в условном форматировании функции CELL("ROW") и CELL("COLUMN") без второго аргумента, она вернет номер активной строки и столбца соответвенно.  Остается сравнить так как хочетсяпростыми условиями и пересчитать, а вот с последним поможет макрос на событие Worksheet_SelectionChange, который запустит перeсчет.
По вопросам из тем форума, личку не читаю.
 
Частично решил,
Код
=ИЛИ(ЯЧЕЙКА("строка")=СТРОКА();ЯЧЕЙКА("столбец")=СТОЛБЕЦ())

и в модуль листа
Код
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
ActiveCell.Calculate
End Sub
но теперь почему-то клавиши право/лево вверх/вниз не активную ячейку передвигают, а лист относительно неё сдвигают
Что и где я мог накосячить?

кажись нашёл... случайно нажал "scroll lock"
 
'В модуль листа
Код
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  Rows.Interior.ColorIndex = xlColorIndexNone
  Target.EntireColumn.Interior.ColorIndex = 6
  Target.EntireRow.Interior.ColorIndex = 6
End Sub
Страницы: 1
Наверх