Wollen Sie mit #VBA Daten in der #Zwischenablage bereitstellen? Use Case: Sie wollen etwas markieren, mit VBA „aufbereiten“ und das Ergebnis dann einfach zur Verfügung haben, um es an beliebiger anderer Stelle dann Einfügen zu können.

Das geht so:

Sub toClipboard()
Dim myCat As Variant
Dim objClip As dataObject
    myCat = Selection & " der Text muss hintendran"
    Set objClip = New dataObject
    objClip.SetText myCat
    objClip.PutInClipboard 
End

Wichtig: damit Sie den Objekttyp dataObject überhaupt haben, müssen Sie mit Extras > Verweise die Bibliothek Microsoft Forms 2.0 Object Library einbinden