стиль линии границы
Range['A4','l'+inttostr(_str-1)].Borders.LineStyle:=xlContinuous;
ширина линии
Range['A4','l'+inttostr(_str-1)].Borders.Weight:=xlHairline;
обводим табличку
Range['A4','l'+inttostr(_str-1)].BorderAround(xlContinuous,
xlThin,
xlAutomatic,
xlAutomatic);
Удачи!
|