Главная страница
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.48 MB
Время: 0.009 c
2-1277301836
winner13
2010-06-23 18:03
2010.09.19
IdHTTP настолько туп что не могу понять как использовать.


15-1277125976
laao
2010-06-21 17:12
2010.09.19
Как получить доступ к SVN-ревизии .DFM в run-time ?


15-1277349628
ixen
2010-06-24 07:20
2010.09.19
Не запускается программа. В чем может быть причина?


2-1277531501
mm0
2010-06-26 09:51
2010.09.19
(Win7)Сообщение о подтв. запуска


15-1277651139
AKE
2010-06-27 19:05
2010.09.19
Стоит ли студенту изучать что-то дополнительно...