Ich habe mir heute aus dem Web das Source-Beispiel zum Kopieren rausgesucht und erfolgreich in mein Programm eingebaut. Es handelt sich um das Beispiel mit mehreren notwendigen Funktionen, über den Umweg eines leeren Writer-Dokuments:
Code: Alles auswählen
Sub TextToClipboard( ByVal cText As String )
End Sub
Sub ClipboardCopy( oDocumentFrame )
End Sub
Sub SelectAll( oDocumentFrame )
End Sub
Sub DocumentDispatch( ByVal oDocumentFrame As Object,_
End Sub
Function GetDocumentFrame( oDoc As Object ) As Object
entFrame() = oFrame
End Function
vg, Maddin