Изменение цвета ячейки при отсутствии формулы или перезаписи вручную

Question

Можно ли изменить цвет ячейки в Excel, если эта ячейка больше не содержит формулы или если она вручную перезаписана и формула теряется?

Answer 1

Да, можно изменить атрибуты ячейки (например, цвет, шрифт и т. Д. c.) Без изменения значения ячейки или формулы. Один из способов - использовать условное форматирование, как это предлагается в разделе комментариев. Если вы хотите использовать vba, код для изменения цвета фона ячеек:

Range("A1").Interior.ColorIndex = colorCode 'You can replace range also by other range-objects like  cells(1, 1)

. Вы можете найти colorCode для вашего c цвета и дополнительную информацию об этой формуле здесь: ColorIndex property

Вы хотите перебрать все ячейки и проверить, есть ли в ячейке формула.

for i = 1 to x 'replace x by the number of rows you have
   if (cells(i, y).isformula = false) then 'replace y by the column you want to search
      cells(i, y).Interior.ColorIndex
   End If
Next