Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2010.08.27;
Скачать: CL | DM;

Вниз

Excel, реализовать в Delphi VB шный оператор Set   Найти похожие ветки 

 
YCH.Del   (2006-12-07 17:36) [0]

Доброе время суток. Товарищи, есть вопрос:

1. Как на Delphi сэмулировать "Set" Excel"a
Set ActiveSheet.VPageBreaks(1).Location = Range("C1")
2. Если нет ответа на 1.
ActiveSheet.VPageBreaks.Add (???)
Что ставить в параметр? Пробовал "D1", Range("D1"), Range["D1"] - не помогает :(

По первому вопросу в тырнете ничего не нашел вообще :( По второму - только то, что написано в excel"евском хелпе (Add .before = ...). Если кто-нить сталкивался - выручите, плз...


 
umbra ©   (2006-12-07 18:34) [1]

в делфи все круглые скобки , в которых стоят индексы надо заменять на квадратные. Все двойные кавычки - на одинарные. В онце строк надо добавлять точку с запятой. Оператор присваивание выглядит как := . Кроме того, надо как-то создать экземпляр экселя.

таким образом,
Set ActiveSheet.VPageBreaks(1).Location = Range("C1")

превращается в

XLApp.ActiveSheet.VPageBreaks[1].Location := Range["C1"];


 
umbra ©   (2006-12-07 18:37) [2]

т.е. в

XLApp.ActiveSheet.VPageBreaks[1].Location := Range["C1"];


 
YCH.Del ©   (2006-12-08 09:32) [3]

Блин, ну я все же чуть-чуть в Delphi разбираюсь... Пример привел из Excel"a (макрос под запись). И то, что ты предложил, уже пробовал. Вся засада именно в Set :( Без него в Excel не сработает (хотя ошибки и не будет)


 
Array ©   (2006-12-08 09:43) [4]


> YCH.Del ©   (08.12.06 09:32) [3]

ИМХО тут надо не Range присваивать , а Cells


 
YCH.Del ©   (2006-12-08 09:57) [5]

Всем спасибо, тема закрыта.
[code]
...
var B: IDispatch;
...
B := XL.ActiveWorkbook.WorkSheets[1].Range["D1:D3"];
XL.ActiveSheet.VPageBreaks.Add(B);
[/code]



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

Текущий архив: 2010.08.27;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.652 c
15-1271991405
вт
2010-04-23 06:56
2010.08.27
Исходник, пример подобный Криптоконтейнер


3-1240933824
Александр из Перми
2009-04-28 19:50
2010.08.27
Как изменять данные в 2-х таблицах малой кровью


15-1264607673
QAZ
2010-01-27 18:54
2010.08.27
Алгоритм Кривая->Кривая безье


15-1271996863
Polevi
2010-04-23 08:27
2010.08.27
Что за база данных ?


2-1272016997
SSD
2010-04-23 14:03
2010.08.27
Как зделать чтобы при входе в программу запршивал логин и пароль