Textmarken in Vorlage

22/04/2008 - 11:24 von Jörg Harnisch | Report spam
Hallo NG,

ich habe eine Vorlage eines Vetrages, die mit Daten aus einer Datenbank
gefüllt wird. In der Vorlage befinden sich Textmarken. Nach dem aus der
Vorlage ein neues Dokument erstellt wurde, sind die Textmarken verchwunden.
Ich möchte aber einige noch in einer Routine ansteuern. Wie kann ich sie
behalten oder übernehmen?

Danke
Jörg
 

Lesen sie die antworten

#1 Christian Freßdorf
22/04/2008 - 11:58 | Warnen spam
Hallo Jörg,

ich habe eine Vorlage eines Vetrages, die mit Daten aus einer Datenbank
gefüllt wird. In der Vorlage befinden sich Textmarken. Nach dem aus der
Vorlage ein neues Dokument erstellt wurde, sind die Textmarken verchwunden.
Ich möchte aber einige noch in einer Routine ansteuern. Wie kann ich sie
behalten oder übernehmen?



dann hast du sich nicht richtig gefüllt, sondern überschrieben.

zeige den Code, mit dem Du die TM füllst oder verwende

Function fkt_ReplaceBookmarkText(oDoc As Document, strBMName As String,
strText As String)
Dim rng As Range
If oDoc.Bookmarks.Exists(strBMName) Then
Set rng = oDoc.Bookmarks(strBMName).Range
rng.Text = strText
oDoc.Bookmarks.add strBMName, rng
End If
End Function

Aufruf:
fkt_ReplaceBookmarkText Documentname, Textmarkenname, Inhalt

Gruß Christian
~~~~~~~~~~~~
Antworten / Rückmeldungen nur in die NG!
Co-Autor von »Microsoft Word-Programmierung.
Das Handbuch« (MS Press)

Ähnliche fragen