Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.05.29;
Скачать: CL | DM;

Вниз

ExcelApplication   Найти похожие ветки 

 
edicon ©   (2003-05-17 00:34) [0]

Привет всем! Работаю с Excel.
var
OVStr,
xlApp:OleVariant;
begin
xlApp:=CreateOleObject("Excel.Application"); //соединяюсь
OVStr:="с:\1.xls";
xlApp.WorkBooks.Open(OVStr); // открываю нужный шаблон
xlApp.Cells[3,1].value:=’Привет!’; // заполняю текстом ячейки
OVStr:="с:\3.xls";
xlApp.ActiveWorkBook.SaveAs(OVStr); //Сохраняю получившийся документ

Но мне надо еще заполнить массивом числовых данных нужный диапазон
a2 := VarArrayCreate([0,(R_M),0,(C-1)],varSingle);
это я делаю так
Worksheet.Range["A1",Worksheet.Cells.Item[R_M,C]].Value :=a2;
Но получается это у меня только при создании нового документа т.е.
XLApp.Connect;
XLApp.WorkBooks.Add(xlWBatWorkSheet,0);
WorkBk := XLApp.WorkBooks.Item[IIndex];
WorkSheet := WorkBk.WorkSheets.Get_Item(1) as _WorkSheet;

А вот как мне сконнектить ExcelApplication с созданным мной файлом 3.xls для заполнения?

xlApp.Quit; // отключаюсь

P.S. Еще один глупый вопрос: вот все говорят что команда по работе с ExcelApplication можно посмотреть в справке VBA. А где там конкретно про это сказано и как это вывести?

Большое СПАСИБО всем откликнувшимся!


 
edicon ©   (2003-05-18 00:35) [1]

неужели никто не знает как их связать???????


 
edicon ©   (2003-05-18 02:05) [2]

Уважаемые мастера ПОМОГИТЕ!!! очень надо!
Спасибо.


 
Романов Р.В. ©   (2003-05-18 09:19) [3]

WorkBk := xlApp.WorkBooks.Open(OVStr);


 
Palladin ©   (2003-05-18 10:24) [4]

люди спят в 2 ночи, а ты тут пустоту вопрошаешь :)


> команда по работе с ExcelApplication можно посмотреть в
> справке VBA.

Самое простое, записать макрос и посмотреть его текст, тогда точно узнаешь что писать...



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

Текущий архив: 2003.05.29;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.014 c
1-94957
Adil
2003-05-18 12:09
2003.05.29
HTML colors


3-94660
P.Kert
2003-05-07 10:58
2003.05.29
Необходимо вставить BLOB !!!


6-94985
moorcat
2003-03-31 10:45
2003.05.29
Proxy


14-95049
Дмитрий_Б
2003-05-09 08:06
2003.05.29
Вопрос по QR 3.0


1-94925
BorisKB
2003-05-16 12:26
2003.05.29
Нужен элегантный алгоритм. Работа с датами.