![]() |
Программное форматирование ячейки в Excel
Задача такова:
Нужно сравнить содержимое двух ячеек и если одна из них меньше другой то её выделить красным. В модуле написал функцию для сравнения, а сменить цвет шрифта не удается. Function Test(x As Range, y As Range) As Integer If x.Value < y.Value Then Здесь нужно форматировать ячейку x Test = 1 Else Test = 0 End If End Function функция подставляется в формулу скрытой ячейки в x и y передаются сравниваемые ячейки |
В StarBasic за это отвечают атрибуты cellBackColor и charColor, которые, среди прочих, есть у ScCellRangeObj. Возможно, в VB тоже самое?
|
vlastek
Вариант для ьвоего примера: Код:
With х.Interior Ну а на будущее - следует не забывать такой полезный инструмент как запись макроса. Потом пользуясь хэлпом всю можно вылизать до необходимой тебе степени... |
Время: 04:05. |
Время: 04:05.
© OSzone.net 2001-