Per Linksklick in die Zwischenablage
22.07.2021 15:25:00
oraculix
In dem Makro soll nur per linker Maustaste die Markierte Stelle in die Zwischenablage kopiert werden.
Was aber nicht Funktioniert zumindest nicht immer!
Frage : Wie kann man den Code verbessern das er immer funktioniert?
'Klick mit linker Maus Kopiert Markierung in die Zwischenablage
Private Sub ListBox1_Click()
Dim objDataObject As DataObject
Set objDataObject = New DataObject
Call objDataObject.SetText(Text:=ListBox1.Text)
Call objDataObject.PutInClipboard
Set objDataObject = Nothing
End Sub