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

список листов в книге excel   Найти похожие ветки 

 
bsv   (2009-07-24 16:40) [0]

Здравствуйте! Нужно получить список листов в книге Excel. Использую TExcelApplication.
Код:

// открываю источник
sBk:=ExcelApplicationS.Workbooks.Open("d:\file.xls", EmptyParam, EmptyParam,
                 EmptyParam, EmptyParam, EmptyParam,
                 EmptyParam, EmptyParam, EmptyParam,
                 EmptyParam, EmptyParam, EmptyParam,
                 EmptyParam, EmptyParam, EmptyParam, LCID);
 //
 // Получаю список листов в книге
 for i:=1 to sBk.Sheets.Count do
   begin
     CmbBoxShNames.Items.Add(sBk.Sheets[i].Name);
   end;

Компилятор говорит, что нет такого свойства "Name".

Что делаю неправильно? Как получить этот список?


 
Anatoly Podgoretsky ©   (2009-07-24 16:44) [1]

> bsv  (24.07.2009 16:40:00)  [0]

А что у тебя выпало после нажатия последней точки?
Кроме того ты справку по Excel DOM смотрел?


 
bsv   (2009-07-24 16:56) [2]

После точки не выпало ничего. Где эту справку посмотреть? Рецепты по работе excel ищу через яндекс.


 
bsv   (2009-07-24 16:57) [3]

Виноват, "С excel"


 
Anatoly Podgoretsky ©   (2009-07-24 17:03) [4]

> bsv  (24.07.2009 16:56:02)  [2]

На сайте Микрософт, поиск можно по указаным словам, также говорят, что оно поставляется с офисом - ни разу не пользовался, всегда лез в MSDN


 
bsv   (2009-07-31 13:20) [5]

правильный ответ:

       // открываю источник
       sBk:=ExcelApplicationS.Workbooks.Open(LblNmFileSource.Caption, EmptyParam, EmptyParam,
                 EmptyParam, EmptyParam, EmptyParam,
                 EmptyParam, EmptyParam, EmptyParam,
                 EmptyParam, EmptyParam, EmptyParam,
                 EmptyParam, EmptyParam, EmptyParam, GetUserDefaultLCID);
       //
       // Создаю список листов в книге
       for i:=1 to sBk.Sheets.Count do
         begin
           ExcelWorksheet1.ConnectTo(sBk.Worksheets[i] as _Worksheet);
           CmbBoxShNames.Items.Add(ExcelWorksheet1.Name);
           ExcelWorksheet1.Disconnect;
         end;



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

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



Память: 0.46 MB
Время: 0.017 c
2-1249185321
Disa
2009-08-02 07:55
2009.10.04
При перетаскивании файла на форму, он открывался


2-1248680807
ford
2009-07-27 11:46
2009.10.04
TWordApplication выдает ошибку - "вызов был отклонен"


3-1227778244
vegarulez
2008-11-27 12:30
2009.10.04
Вопрос про ZeosDBO. (Zquery.Fields[i].AsDatetime)


2-1249405228
xyz
2009-08-04 21:00
2009.10.04
настройка datetimepicker а


15-1249283477
Kerk
2009-08-03 11:11
2009.10.04
Изречения великого руководителя полководца Ким Чен Ира




   Наверх