Главная страница
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.01 c
2-1277152731
Askalot
2010-06-22 00:38
2010.09.19
Тормоза


15-1276971762
sniknik
2010-06-19 22:22
2010.09.19
Перехват ссылки в TWebBrowser.


15-1276582543
12
2010-06-15 10:15
2010.09.19
Мысль. Сельское хоз-во. Давление и полив.


2-1277196510
Who_is_you?
2010-06-22 12:48
2010.09.19
сбои в асинхронном приеме с сом порта


15-1277670592
Юрий
2010-06-28 00:29
2010.09.19
С днем рождения ! 28 июня 2010 понедельник