Скачать: 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 вся ветка

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



Память: 0.45 MB
Время: 0.012 c