AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Word Makro mit Delphi aufrufen

Ein Thema von nezumi · begonnen am 20. Jun 2006 · letzter Beitrag vom 21. Jun 2006
Antwort Antwort
nezumi

Registriert seit: 20. Apr 2006
Ort: Berlin
56 Beiträge
 
#1

Word Makro mit Delphi aufrufen

  Alt 20. Jun 2006, 11:16
Hallo zusammen,

Habe ein Programm geschrieben, mit dem ich ein Word Dokument öffnen und bearbeiten kann (hunderte von "Suchen" "Ersetzen" und Formatierungen usw.). Nun möchte ich innerhalb des Programms für eine bestimmte Formatierung ein Makro benutzen, weil ich die Programmierung mit Delphi nicht hinbekomme.

Kann mir bitte jemand sagen, wie ich ein word-makro mit Delphi aufrufe?


Habe im Netz folgenden Vorschlag gefunden:

Delphi-Quellcode:
var MeinWord: Variant;
begin
  ...
  MeinWord := CreateOleObject('Word.Application');
  //Verschiedene Aufrufarten
  MeinWord.Run('MeinMakro');
  MeinWord.Run('Normal.Module1.MAIN');
  MeinWord.Run('MeinProjekt.MeinModul.MeineProzedur');
  MeinWord.Run('MeinDokument.doc!DiesesModul.DieseProzedur');
  ...
end;
Das funktioniert aber irgendwie nicht, weil "CreateOleObject" nicht erkannt wird..

Besten Dank!

PS: Delphi6, Word2000, XP
nezumi
- Eddy the Eagle unter den Programmierern -
  Mit Zitat antworten Zitat
Benutzerbild von s.h.a.r.k
s.h.a.r.k

Registriert seit: 26. Mai 2004
3.159 Beiträge
 
#2

Re: Word Makro mit Delphi aufrufen

  Alt 20. Jun 2006, 12:12
Warum geht CreateOLEObject nicht? musst da dafür net eine Unit einbinden, dass das ganze geht???

Also ich hab hier in der Uni Delphi 7 und da muss ich die Unit ComObj einbinden. Dann hat alles geklappt - bis auf die Ausnahme, dass er das Makro nicht finden konnte, was klar ist!
»Remember, the future maintainer is the person you should be writing code for, not the compiler.« (Nick Hodges)
  Mit Zitat antworten Zitat
nezumi

Registriert seit: 20. Apr 2006
Ort: Berlin
56 Beiträge
 
#3

Re: Word Makro mit Delphi aufrufen

  Alt 21. Jun 2006, 10:33
Hallo s.h.a.r.k,
danke für Deine Hilfe. Habs jetzt durch rumprobieren hingekriegt:

WordApplication1.Run('Makroname'); Greetings,
nezumi
- Eddy the Eagle unter den Programmierern -
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 23:57 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz