Главная страница
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.011 c
15-1277316827
zlodey
2010-06-23 22:13
2010.09.19
песни про программистов


2-1277427763
Diplomat
2010-06-25 05:02
2010.09.19
Как лучше осуществить триальность программы


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


2-1277316263
ribos
2010-06-23 22:04
2010.09.19
В консоли ошибок нет, переношу под VCL вылетает исключение


15-1277096188
tipman
2010-06-21 08:56
2010.09.19
Выпадающая таблица или таблица в ComboBox