Hallo...das habe ich gerade gemacht.
Nun wüßte ich zu gerne wie ich das umschreiben kann, sodass ich es von Delphi ausführen lassen kann:
Zitat:
WordBasic.ViewFooterOnly
ActiveDocument.AttachedTemplate.BuildingBlockEntri es("Einfache Zahl 3"). _
Insert Where:=Selection.Range, RichText:=True
ActiveWindow.ActivePane.View.SeekView = wdSeekMainDocument
Gruss Capo