Главная страница
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
1-1218115742
Lacmus
2008-08-07 17:29
2009.10.04
Преобразование WideString в String


2-1249321361
linox
2009-08-03 21:42
2009.10.04
регистр при фильтрации


15-1249322695
Kerk
2009-08-03 22:04
2009.10.04
Рекурсия


2-1248854287
xyz
2009-07-29 11:58
2009.10.04
исключение "недопустимое имя"


2-1248115102
thing
2009-07-20 22:38
2009.10.04
3D игра - переход от управления с клавы на мышь