Условное форматирование - VBA

Узнай цену своей работы

Формулировка задачи:

Помогите решить задачку.... при условном форматировании необходимо, чтобы активная ячейка находилась вверху колонки, то есть А1 или В1 или С1 и так далее. Если вызвать макрос и ячейка будет находится ниже указанной, то поплывет все форматирование. Что нужно коду, чтобы можно было форматировать из любого места на листе и при этом оставаться в активной ячейке? (кроме переменой, в которую задается адрес активной ячейки)

Решение задачи: «Условное форматирование»

textual
Листинг программы
Dim Rng As Range
Set Rng = Range("A3:A333")
    
With Rng.FormatConditions
     .Delete
     With .Add(Type:=xlExpression, Formula1:="=R[-2]C=R[-2]C[1]") '"=RC=RC[1]" Может ?
          .SetFirstPriority
          .Interior.Color = RGB(111, 255, 177) 'GREEN
          .StopIfTrue = True
    End With
End With

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

11   голосов , оценка 4 из 5
Похожие ответы