Вниз
Скачать: CL | DM;

Как с экселе обвести рамочками диапазон?   Найти похожие ветки 

← →
TStas ©   (2005-09-15 03:03) [0]

Пробовал писать мышкой макрос, состоящий из одного действия, но он очень запутанный получается


← →
dmitry501 ©   (2005-09-15 05:55) [1]


......................
 // Левая верхняя ячейка области, в которую будем выводить данные
 Cell1 := MyExcel.Cells[BeginRow,BeginCol];
 // Правая нижняя ячейка области, в которую будем выводить данные
 Cell2 := MyExcel.Cells[BeginRow + RowCount - 1, BeginCol + ColCount-1];
 // А вот и сам вывод данных
 MyExcel.Range[Cell1, Cell2].Value := ArrayData;
 // Отформатируем
 MyExcel.Range[Cell1,Cell2].Borders.LineStyle := 1;
 MyExcel.Range[Cell1,Cell2].Font.Bold := False;
..................


← →
apollo ©   (2005-09-15 14:59) [2]

MyExcel.Range[Cell1,Cell2].Around(<LineStyle>,<Weight>,<ColorIndex>,<Color>);

Например:
MyExcel.Range[Cell1,Cell2].Around(xlContinuous,xlThin,xlAutomatic,EmptyParam);


← →
apollo ©   (2005-09-15 15:02) [3]

Исправление к предыдущему

Не Around, а BorderAround


← →
HeathRow   (2005-11-30 11:55) [4]

При компиляции говорит:
Undeclared identifier: "xlContinuous"
Undeclared identifier: "xlAutomatic"


← →
umbra ©   (2005-11-30 14:44) [5]

xlBorderLineStyleContinuous и xlBorderLineStyleAutomatic

но вообще то справка по Excel VBA рулит


← →
HeathRow   (2005-12-01 07:36) [6]

Работающий пример привести можно?
Всего одну строчку.


← →
YurikGL ©   (2005-12-01 17:34) [7]


> Работающий пример привести можно?



> MyExcel.Range[Cell1,Cell2].Around(xlContinuous,xlThin,xlAutomatic,EmptyParam);


uses Excel2000 если не ошибаюсь...


← →
HeathRow   (2005-12-02 07:38) [8]

Спасибо. А с 2003-им (тобишь XP) Екселем она коректно будет работать?


← →
YurikGL ©   (2005-12-02 21:49) [9]


> Спасибо. А с 2003-им (тобишь XP) Екселем она коректно будет
> работать?

Должно работать


← →
Profi ©   (2005-12-05 03:26) [10]

HeathRow   (02.12.05 7:38) [8]
XP и 2003 - разные вещи, но должно.



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.019 c
2-1179471546
Клара
2007-05-18 10:59
2007.06.10
Фильтрация


15-1178992711
Ёжик
2007-05-12 21:58
2007.06.10
Вышел - таки KDE4


11-1161750263
Lari
2006-10-25 08:24
2007.06.10
Ошибка чтения файла при использовании PStream


15-1179385137
Kerk
2007-05-17 10:58
2007.06.10
Oracle External Procedure на Delphi


2-1179494188
gdsgdfdssdggsd
2007-05-18 17:16
2007.06.10
сетевое приложение




   Наверх