Формат границ ячейки
Формат границ ячейки Формат границ ячейки Границы ячейки имеют следующие свойства: цвет, стиль и толщина. Чтобы получить доступ к границе, используем коллекцию Borders объекта Range, которая через индекс (Edge) предоставляет доступ к той или иной стороне границы ячейки (левая, правая и т.д. сторона). Edge может принимать одно из 8 определенных значений. Объекты коллекции Borders определяют цвет границы, который может задаваться выбором из определенной в Excel палитры или как комбинация из трех цветов RGB. Свойство ColorIndex содержит индекс цвета: когда нас не устраивает цвет из заранее определенной палитры, тогда используем свойство Color, в которое запишем значение из комбинации трех основных цветов, например: Color= RGB(200,100,125). Стиль границы (LineStyle) имеет тип integer и одно из 8 предопределенных значений (смотрите приложение). Толщина границы (Weight) имеет тип integer и одно из 4 значений. Исходный текст функции для установки параметров границы ячейки смотрите ниже.
Edge,LineStyle,Weight,ColorIndex,Color:integer):boolean;
begin
SetBorderRange:=true;
try
E.ActiveWorkbook.Sheets.Item[sheet].Range[range].Borders.item
[Edge].Weight:=Weight;
E.ActiveWorkbook.Sheets.Item[sheet].Range[range].Borders.item
[Edge].LineStyle:=LineStyle;
if ColorIndex>0 then
E.ActiveWorkbook.Sheets.Item[sheet].Range[range].Borders.item
[Edge].ColorIndex:=ColorIndex
else
E.ActiveWorkbook.Sheets.Item[sheet].Range[range].Borders.item
[Edge].Color:=color;
except
SetBorderRange:=false;
end;
End;
Отправить комментарий