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

Вниз

Работа с MS Excel   Найти похожие ветки 

 
Mameluke ©   (2004-06-07 14:16) [0]

Доброго времени суток!
Подскажите, пожалуйста, как правильно прописать строку для TExcelApplcation, чтобы создавалась новая книга? Если можно, приведите эту строку (а то открыть существующую книгу могу, а новую создать не получается)


 
Тимохов ©   (2004-06-07 14:20) [1]

var
fapp: variant;

fApp := CreateOleObject("Excel.Application");
Workbooks.Add


 
Mameluke ©   (2004-06-07 14:29) [2]

Честно говоря, я уже пробовал:

var
 n: OleVariant;

begin
 n:= "n1.xls";
 ExcelApplication.Workbooks.Add (n,0);
end;

и результат такой же, как и в предложенном Вами варианте. (Add требует параметров, с указав которые, он начинает искать существующую книгу. Может быть, я параметры в скобках неверно указываю?)


 
Тимохов ©   (2004-06-07 14:40) [3]


> Mameluke ©   (07.06.04 14:29) [2]
> Честно говоря, я уже пробовал:

я вообще без параметров указываю. Позднее связываение, которым пользуетесь и вы, позволяет опускать параметры.
Вам же нужна новая книга?
Если да, то мой вариант это и делает.


 
Mameluke ©   (2004-06-07 15:18) [4]

Странно... Я и Ваш, и свой вариант пробовал - Delphi ругается: Not enough actual parameters :(


 
Artem03   (2004-06-07 15:20) [5]

Делай точно, как показано ниже:

MyExcel: Variant;
...
MyExcel:=CreateOLEObject("Excel.Application");
MyExcel.WorkBooks.Add;

За три года - никаких проблем.


 
Тимохов ©   (2004-06-07 15:29) [6]


> Mameluke ©   (07.06.04 15:18) [4]

ну да, перед workbooks fapp в моем примере надо поставить (думал очевидно).
тогда он в точности получится как пример 5, и все должно работать.



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

Форум: "Основная";
Текущий архив: 2004.06.20;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.031 c
9-1077482489
Bek
2004-02-22 23:41
2004.06.20
Кто что знает про свет в Opengl?


14-1086268286
AlexG
2004-06-03 17:11
2004.06.20
Работа со строками в VB Excel.


1-1086275670
Funnymind
2004-06-03 19:14
2004.06.20
Про пути дороги


14-1086021025
Adminus
2004-05-31 20:30
2004.06.20
Виртуальный сервер.


4-1084117252
a_legayda@mtu-net.ru
2004-05-09 19:40
2004.06.20
Шрифты





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский