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

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

Наверх




Память: 0.48 MB
Время: 0.015 c
2-1248977190
xyz
2009-07-30 22:06
2009.10.04
insert или update


15-1248942849
Miob
2009-07-30 12:34
2009.10.04
Отключить обновление экрана монитора


2-1249297518
bag
2009-08-03 15:05
2009.10.04
stringgrid ondrawcell в отдельном модуле


2-1248432381
Franzy
2009-07-24 14:46
2009.10.04
Копирование картинки непопиксельно, а одним махом


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