Das Notes Forum
Domino 9 und frühere Versionen => ND8: Entwicklung => Thema gestartet von: bredemeier am 20.06.14 - 15:05:38
-
Hallo,
ich übergebe per LS Text mit Umbrüchen aus einem reinen Textfeld an Bookmarks in ein geöffnetes OpenOffice Writer Dokument.
Die Übergabe funktioniert problemlos, nur an den Umbrüchen werden zusätzlich Leerzeilen eingefügt.
Z.B. Bei einer Adresse im Textfeld:
Vorname Nachname
Straße
PLZ Ort
wird in OpenOffice
Vorname Nachname
Straße
PLZ Ort
eingefügt.
Hat hier jemand eine Idee?
Function fTextmarke(objDoc As Variant, bookmark As Variant, sText As String)
On Error Goto Fehler
Dim oTM As Variant
Dim oBookmark As Variant
Dim oTC As Variant
Set oTM = objDoc.Bookmarks.getByName(bookmark)
Set oBookmark = objDoc.getBookmarks().getByName(bookmark).getAnchor()
Set oTC = oBookmark.Text.CreateTextCursorByRange(oTM.Anchor)
oTC.String = sText
Exit Function
Fehler:
Msgbox "Die Textmarke wurde nicht gefunden!"
End Function
Danke für eure Zeit, Volker
-
Moin
Evtl. hilft es die Zeilenumbrüche vorher zufiltern.
Ich kann mir vorstellen, dass die Zeilenumbrüche als CHR(13) & CHR(10) (CRLF) mitgegeben werden und Openoffice beides als Zeilenumbrüche interpretiert.
-
Moin Urs,
cool, funktioniert. Es ist dabei auch egal, ob ich Chr(10) oder Chr(13) herausnehme, das Ergebnis ist das Gleiche.
Danke für den Tip, Volker