Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2010.09.19;
Скачать: CL | DM;

Вниз

Количество страниц в Excel   Найти похожие ветки 

 
Ромка ©   (2007-01-05 10:53) [0]

Работая с Excel через компонент TExcelApplication задать количество страниц можна очень просто:

var
 ExcelApp: TExcelApplication;
...
 ExcelApp.SheetsInNewWorkbook[LOCALE_USER_DEFAULT] := 2;

...

Вопрос: как прочитать это значение?

При использовании кода

TmpInt := ExcelApp.SheetsInNewWorkbook[LOCALE_USER_DEFAULT];

получаем ошыбку "Недопустимое число параметров".


 
Array ©   (2007-01-05 11:40) [1]


>  "Недопустимое число параметров".

Тут всё сказано, параметров ввобще не должно быть
Вот что пишет справка
SheetsInNewWorkbook Property
See AlsoApplies ToExampleSpecificsReturns or sets the number of sheets that Microsoft Excel automatically inserts into new workbooks. Read/write Long.

Example
This example displays the number of sheets automatically inserted into new workbooks.

MsgBox "Microsoft Excel inserts " & _
   Application.SheetsInNewWorkbook & _
   " sheet(s) in each new workbook"


 
Ромка ©   (2007-01-05 11:44) [2]

Оно то так. Но если не задавать параметров вообще, то компилятор не пускает.


 
Array ©   (2007-01-05 12:00) [3]

Попробуйте не пользоваться компонентами, а делать всё через OLE? думаю так будет надёжнее


 
Ромка ©   (2007-01-05 12:12) [4]

Это крайний вариант. Очень не хочется переписывать полпрограмы.


 
YurikGL ©   (2007-01-05 22:41) [5]

При работе с Excel очень-очень советую работать через CreateOleObject.

з.ы. попробуй ExcelApplication1.ActiveWorkbook.Sheets.Count



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

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

Наверх




Память: 0.47 MB
Время: 0.011 c
2-1277356210
И. Павел
2010-06-24 09:10
2010.09.19
Работа с ADO. Выделение параметров.


2-1277194041
ixen
2010-06-22 12:07
2010.09.19
Фильтрация с задержкой


2-1277721170
Scot Storch
2010-06-28 14:32
2010.09.19
проверка наличия IDs в таблице


15-1276586599
brother
2010-06-15 11:23
2010.09.19
Электронные сигареты


15-1276989298
брюква
2010-06-20 03:14
2010.09.19
asm вставка ByteToBin и BinToByte