Um mit Visual Basic etwas in die Zwischenablage zu bekommen, sind ein paar Klimmzüge notwendig:
Kopiere den Text aus strText
in die Zwischenablage.
Dim MyData As DataObject
Set MyData = New DataObject
MyData.SetText strText
MyData.PutInClipboard