Изменить цвет ячейки - .Interior.ColorIndex
Чтобы изменить цвет ячейки, мы можем использовать:
Cell.Interior.ColorIndex = Num
Где:
• Ячейка - это ссылка на ячейку.
• Интерьер - относится к цвету фактического цвета ячейки (свойство интерьера).
• Colourindex - это значение от 1 до 56 для одного из 56 предопределенных цветов Excel.
А Num - это номер цвета, присвоенный ячейке. Однако не всегда легко запомнить, какое число представляет какой цвет. Следующая подпрограмма изменяет цвет ячейки в зависимости от номера строки. Так, например, строка 3 будет иметь цвет 3 и т. Д.
Поскольку в Excel имеется 56 предустановленных цветов, это означает, что ячейки 59, 115 будут того же цвета, что и ячейка в строке 3:
123456789101112 | Вариант ЯвныйЧастная подпрограмма CommandButton1_Click ()Colour_Range (Листы ("Лист2"). Диапазон ("A1: A2000"))Конец подпискиSub Colour_Range (Диапазон_ячейки как диапазон)'Будет окрашивать каждую ячейку в диапазонеТусклая ячейкаДля каждой ячейки в Cell_RangeCell.Interior.ColorIndex = Cell.Row Mod 56Cell.Offset (0, 0) .Value = Cell.RowСледующийКонец подписки |
Процедура активируется событием щелчка.
Чтобы загрузить файл .XLSM для этого руководства, щелкните здесь.