Daten aus ClipBoard einfügen
11.09.2017 11:22:26
Henner
Ich möchte Daten aus dem Zwischenspeicher einfügen und habe dazu verschiedene Methoden im Forum und im Netz gefunden. Im Grundprinzip sind alle gleich aufgebaut:
Sub Test()
Dim objDataObject As DataObject
Set objDataObject = New DataObject
objDataObject.GetFromClipboard
Sheets("Tabelle1").Range("A1").Value = objDataObject.GetText
Set objDataObject = Nothing
End Sub
Dim objDataObject As DataObject