vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
vb@rchiv Offline-Reader - exklusiv auf der vb@rchiv CD Vol.4  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2024
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Fortgeschrittene Programmierung
Textbausteine einfügen 
Autor: Balthasar von Graffenried
Datum: 25.05.11 19:26

Halli Hallo zusammen
Vieleicht kann mir hier jemand helfen.

Ich habe einen kleinen Code (VBA) in Office 2007 - Word geschrieben der mir aus den Schnellbausteinen einen Textbaustein in die erste Zelle einer 2-Zelligen Tabelle im Header einfügen soll.

bei der Zeile:
ActiveDocument.AttachtedTemlate.AutoTextEntries(autoText).Insert _
  where:=Position, chText:=True
In "Position" steht der Zellen bereich der Tabelle in den der eintrag eingefügt werden soll

Set Position = ActiveDocument.Sections(1).Headers( _
  wdHeaderFooterPrimary).Range.Tabels(1).Cells(1, 1).Range
Allerdings erhalte ich bei diesem Code eine Fehlermeldung "Laufzeitfehler -2...(80004005) Automatisierungsfehler, Fehler Unbekannt" was könnte das Problem sein? Oder gibt es einen anderen lösungsansatz?

Ich wäre echt dankbar für einen Tip
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Textbausteine einfügen2.857Balthasar von ...25.05.11 19:26
Re: Textbausteine einfügen2.203Dirk25.05.11 23:13
Re: Textbausteine einfügen2.198Balthasar von ...26.05.11 06:46
Re: Textbausteine einfügen2.213Balthasar von ...26.05.11 15:55

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2024 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel