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

Вниз

Word&Delphi   Найти похожие ветки 

 
ga3   (2002-05-18 03:19) [0]

Как из дельфи запустить макрос на VB со строковыми параметрами, которые сам макрос будет вбивать в шаблон? и как сделать чтоб макрос принимал ети параметры?


 
AFROLOV   (2002-05-18 10:37) [1]

В Delphi
var
MSWord: Variant;
.....
begin
MSWord:= CreateOleObject("Word.Application");
MSWord.Visible:=true;
MSWord.Documents.Open(FileName);//FileName имя шаблона в котором лежит нужный макрос
....
result:=MSWord.Run("MyMacro"{имя макроса},par1,par2,....);
....
end;

VBA
function MyMacro(Byref par1 as string,Byval par2 as long)
.....
end function

К сожалению такую передачу параметров можно осуществить только начиная с office 2000. В более ранних версиях придется извращаться (DDE, временные файлы, filemapping и тд.).
В качестве параметров, к огромному сожалению, нельзя использовать объекты и записи.







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

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

Наверх





Память: 0.44 MB
Время: 0.005 c
6-97368
alexay
2002-03-20 12:57
2002.05.30
Передача письма из дельфи с текстом сообщения и прикрепленными файлами!


6-97378
legioner
2002-03-19 13:14
2002.05.30
Firewall


3-97117
Oleg-2
2002-05-09 16:43
2002.05.30
Сохранение базы данных


8-97357
Neo
2001-12-29 04:32
2002.05.30
звеняйте что тревожу, но застраял...


7-97434
pvn
2002-03-06 05:57
2002.05.30
народ, помогите пожалуйста!!!





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