Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.04.11;
Скачать: 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 вся ветка

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

Наверх




Память: 0.47 MB
Время: 0.038 c
3-1081933782
nv_
2004-04-14 13:09
2004.04.11
Поиск в подстановочном поле


1-1082944483
zsv
2004-04-26 05:54
2004.04.11
Запуск *.bat


1-1082562482
Ivolg
2004-04-21 19:48
2004.04.11
Изобоажение


1-1082644792
моё_имя
2004-04-22 18:39
2004.04.11
закрытие MDI-формы


7-1080470187
VitGun
2004-03-28 14:36
2004.04.11
Перехват обращения к FDD, LPT,USB