Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Corba";
Текущий архив: 2010.09.19;
Скачать: [xml.tar.bz2];

Вниз

Количество страниц в 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 вся ветка

Форум: "Corba";
Текущий архив: 2010.09.19;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.004 c
2-1277379241
nobody
2010-06-24 15:34
2010.09.19
Тип как массив компонентов заданного типа


15-1277555904
Иксик
2010-06-26 16:38
2010.09.19
Прочитал Хаксли. ИШ, спасибо!


15-1277324994
Юрий
2010-06-24 00:29
2010.09.19
С днем рождения ! 24 июня 2010 четверг


2-1277184716
Miko
2010-06-22 09:31
2010.09.19
Не найдена точка входа процедуры в DLL


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





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский