Hallo Forum!
Ich habe eine einfache Aufgabe. Ich soll über eine Action am Mail-Formular den markierten Text auslesen und in die Zwischenablage kopieren. Dafür habe ich folgenden Code verwendet:
Dim workspace As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
Set uidoc = workspace.CurrentDocument
uidoc.Copy
Das funktioniert auch zuverlassig, solange es sich um Plain Text E-Mails handelt. Habe ich aber eine Rich Text E-Mail wird immer die Headline des E-Mail-Formulars in die Zwischenablage kopiert. Da heute die wenigsten Mails als reiner Text verschickt werden, funktioniert meine Funktion nur selten.
Ich habe auch schon alternativ mit GetSelectedText experimentiert aber die Funktion liefert in besagtem Fall immer einen Leerstring. Das brint mich auch nicht weiter.
Als Ergänzung muss ich noch sagen, dass das Mail-Formular immer im Read Mode ist, da meine Funktion hauptsächlich für eingehende E-Mails gedacht ist. Im Edit Mode funktioniert es aber ich brauche es im Read Mode.
Was mache ich falsch? Gibt es eine Alternative, wie ich an den markierten Text aus dem Mail-Body auslesen kann? Ich sitze jetzt schon einige Stunden an diesem Problem und bin über jeden Tip dankbar ...
Viele Grüße