Hallo,
ich habe mir in Word ein Formular entwickelt, das Textformularfelder an den entsprechenden Stellen enthält. Nun möchte ich aus Access heraus diese Textformularfelder ausfüllen. Wenn ich nun einen reinen Wordtext habe, der Textmarken enthält, dann funktioniert das Ausfüllen wunderbar. Möchte ich nun aber im Formular diese Textformularfelder ausfüllen, so erhalte ich eine Fehlermeldung, daß der Text nicht geändert werden kann. Was muß ich hier anders machen.
So sieht momentan der Quelltext aus:
Dim objWord As New Word.Application
Dim wrdDoc As Word.Document
Dim wrdTextmarken As Word.Bookmarks
objWord.Visible = True
Set wrdDoc = objWord.Documents.Add(„Abholauftrag“)
Set wrdTextmarken = wrdDoc.Bookmarks
wrdTextmarken.Item(„Auftraggeber“).Range.Text = CStr(Forms!Firmenkarte![Firmenname])
Wer weiß, was ich hier anders machen muß, daß das entsprechende Textformularfeld gefüllt wird?
Gruß
Thomas