Lotus to Word Zeichenfolge zu lang

[mde]

Hi @All

ich versuche von Lotus aus in Word Felder zu befüllen, Das klappt mit fast allen Feldern ganz gut nur bei einem Feld ist der Text zu groß und ich bekomme das nicht hin...

ich nutze zum Füllen der Word dokumente :
wobj.ActiveDocument.FormFields("Text8").Result = LifDat

Dim XYtext As String
XYtext = pdoc.XYText(0)
wobj.ActiveDocument.FormFields("Text9").Result = XYtext

Wie schaffe ich es die Größe der Word Felder anzupassen?
Ich habe auch schon im Forum gesucht und habe das "Range" Object gefunden
Allerdings schaffe ich es nicht dieses funktuionierend in meinen Code einzubauen

Kann mir jemand helfen?
Wenn ja ....
bitte einen Tipp..

Gruß

[Axel]

Mit welcher Office-Version arbeitest du denn und wie lang ist der Text?

Axel

[mde]

Hi Axel

Die Word Version ist Word 2000 (9.0.2812)

Im Text sind 580 Zeichen mit Leerzeichen in 4 Absätzen

Ich hoffe du kannst was mit der Info anfangen

[Axel]

Das klappt mit fast allen Feldern ganz gut nur bei einem Feld ist der Text zu groß und ich bekomme das nicht hin...

Was genau funktioniert nicht? Fehlermeldung? Text wird abgeschnitten? Wenn ja, wo?

Wie schaffe ich es die Größe der Word Felder anzupassen?

Das wird in den Feldeingeschaften im Worddokument festgelegt.


Axel

[mde]

Ein Textfeld in Word soll mit einem lägeren Text gefüllt werden.
kommend aus einem Textfeld in einer NotesDB.

Die genaue Fehlermeldung lautet:
"Fehler 213 beim Word Datenaustausch in Zeile 68: Microsoft Word Zeichenfolge zu lang."

Der Code aus der Zeile ist
wobj.ActiveDocument.FormFields("Text9").Result = XYtext

XYtext ist ein Textstring aus eienm Notesfeld.
Der Text hat ein paar Zeilenumbrüche?
Bis ca. 156 Zeichen lässt sich das WORD Feld auch über Notes befüllen.

Das Textfeld ist in Word bei Maximale Länge mit "Unbegrenzt" angegeben.
Alle anderen Felder im Dokument werden richtig befüllt, die werden vor diesem Feld abgearbeitet.

Danke für deine Hilfe

Gruß Michael

[Axel]

So wie es aussieht bist du in eine ähnlicher Falle getappt wie ich, wenn es um die Übertragung längerer Zeichenketten per COM/OLE an Office geht. Ich hatte das Problem mit Excel.

Einstellen lässt sich da nichts. Muss der Text in ein Formularfeld? Wenn du ihn so einfügst, z.B. an einer Textmarke, dann sollte es mit längeren Texten keine Probleme geben.


Axel

[mde]

Danke Axel

Ich habe das Feld durch eine Textmarke ersetzt, und schon funktioniert das einfügen.
Jetzt müssen alle mit der Textmarke arbeiten.

Gruß
Michael

[Fedaykin]

Hallo mde

Mit OLE/COM hat das ganze nichts zu tun. Ist einfach "eine Falle" in Word. Kannst auch rein in Word ausprobieren. Interessant ist das:

Schlägt fehl wie Dir bereits aufgefallen:
 ActiveDocument.FormFields("Text9").Result = String(260, "T")

Klappt tadellos:
 ActiveDocument.FormFields("Text9").Range.Fields(1).Result.Text = String(260, "T")

Gruss
Remo