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

Как добавить лист в Excel   Найти похожие ветки 

← →
Deni   (2004-03-25 10:30) [0]

Соединяюсь с Excel через компоненту ExcelApplication следующим образом: (XLApp - это и есть компонента ExcelApplication)

// Соединяюсь с сервером TExcelApplication
  XLApp.Connect;
// Добавляю WorkBooks в ExcelApplication
  XLApp.WorkBooks.Add(xlWBatWorkSheet,0);
// Выбираю первую WorkBook
  WorkBk := XLApp.WorkBooks.Item[1];
// Определяю первый WorkSheet
  WorkSheet := WorkBk.WorkSheets.Get_Item(1) as _WorkSheet;

//Здесь пересылаю какие-то данные

  XLApp.Visible[0] := True;
  XLApp.Disconnect;

При таком раскладе в WorkBook есть только 1 лист. ВОПРОС! Как в этой схеме добавить лист и сделать его текущим?


← →
SeZam   (2004-03-25 10:57) [1]

Попробуй:
XLApp.Sheets.Add(Параметры)


← →
Deni   (2004-03-25 11:04) [2]

Я пробовал так:
XLApp.WorkSheets.Add("А какие параметры здесь писать???");


← →
Deni   (2004-03-25 11:10) [3]

Короче вопрос такой, какие параметры писать, чтобы добавить обычные нормальный лист? И где их вообще можно посмотреть? В справке Excel нет...


← →
LexXP ©   (2004-03-25 12:40) [4]

Запускаешь Excel
говоришь записать макрос
Добавляешь лист
Заканчиваешь запись макроса
Смотришь текст макроса
Или в VBA смотришь Object Browser

Function Add(Before:OleVariant,After:OleVariant,Count:OleVariant,Type:OleVariant, x:integer)


← →
Deni   (2004-03-25 13:42) [5]

Если смотреть в макросы там будет только Sheets.Add
Это я понимаю, что Add(Before:OleVariant,After:OleVariant,Count:OleVariant,Type:OleVariant, x:integer) а какие конкретно переменные-то? Пример плиз  :(?



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

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



Память: 0.46 MB
Время: 0.03 c
3-1079361439
ceval
2004-03-15 17:37
2004.04.11
Помоготе разобраться c IndexFieldNames


6-1079223072
Vitaliy
2004-03-14 03:11
2004.04.11
Как вытащить в ссылки из html документа


3-1081423941
AlexPal
2004-04-08 15:32
2004.04.11
Проблемы с Русским шрифтом


3-1078429378
novill
2004-03-04 22:42
2004.04.11
Испортилась таблица Paradox, на ней даже Database Desktop виснет.


1-1082378613
ikivio
2004-04-19 16:43
2004.04.11
Win98 ругается на RestoreKey




   Наверх