Hi Chris,
hier mal ne ganz kurze Anwort:
Sub Click(Source As Button)
Dim ws As New NotesUIWorkspace
Dim udoc As NotesUIDocument
Set udoc = ws.CurrentDocument
Call udoc.FieldAppendText("test", Chr(10) + Chr(13))
End Sub
test ist in diesem Fall der Feldname.
Gruss Jan
Hallo Chris,
an einen bestehenden Text eines Feldes einen Zeilenumbruch anhängen geht auf verschiedene Weise
... mit @NewLine löst es sich auch so
Dim ws As New NotesUIWorkspace
Dim docThis As NotesDocument
Set docThis = ws.CurrentDocument.Document
docThis.Test = Evaluate({Test + @NewLine} , docThis )
... es geht auch über die Chars - da musst du nur auf die Reihenfolge der Chars achten....
Toni