Вниз
Скачать: 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.017 c
15-1179293278
31512
2007-05-16 09:27
2007.06.10
Опаньки!


2-1179515212
Пргораммер
2007-05-18 23:06
2007.06.10
Код клавиши Esc


15-1179109412
Slider007
2007-05-14 06:23
2007.06.10
С днем рождения ! 14 мая


1-1176820057
DelphiLexx
2007-04-17 18:27
2007.06.10
DrawText


2-1179418874
Skynet_
2007-05-17 20:21
2007.06.10
Двойной щелчек по выделенной строке в DBGride




   Наверх