Feldinhalt mit Formatierung per LS in ein anderes Feld übernehmen

    Hi !


    ich möchte per Button den Inhalt eines Signaturfeldes aus dem CalendarProfil in ein neues Memo einfügen.
    Das funktioniert auch. Was nicht klappt, ist, dass die Formatierungen der Signatur nicht übernommen werden.
    Formatierung heisst, dass die Schriftart und Farbe nicht berücksichtigt wird, die im CalendarProfil hinterlegt sind.
    Der Inhalt, der in das Memo eingefügt wird, hat die Standardfarbe und Grösse des Body Feldes des Memo.
    Hier mein Code. Jeder Tipp ist gern genommen :)



    Sub Click(Source As Button)
    Dim s As New notessession
    Dim profiledoc As NotesDocument
    Dim db As notesdatabase
    Dim signature As String
    Dim uidoc As NotesUIDocument
    Dim workspace As New NotesUIWorkspace

    ' Get signature from profiledocument
    Set db = s.currentdatabase
    Set profileDoc = db.GetProfileDocument("CalendarProfile")
    signature = profileDoc.Signature_1

    ' Put into email
    Set uidoc = workspace.CurrentDocument
    Call uidoc.GotoField( "Body" )
    Call uidoc.InsertText( signature)

    End Sub

    das hatte ich gemacht. aber hier wird die Standardsignatur importiert.
    Und ich möchte "unabhängig" von der eingestellten default signatur einen feldinhalt importieren.