Текущий архив: 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.013 c