ich habe eine UserForm und möchte dort gerne per Button-Klick den Text einer Textbox in die Zwischenablage kopieren.
Bisher habe ich folgenden Code:
Private Sub BtnCopySql_Click()
Dim varResults As New DataObject
With varResults
.SetText varSql ' identisch zu Me.TxtSql.Text
.PutInClipboard
End With
Unload Me
End Sub
Das funktioniert leider nicht und kopiert mir gar nichts (bzw, je nach Editor, nur 2 Fragezeichen) in die Zwischenablage. An der Variablen (varSql) liegt es nicht, denn wenn ich sie zum testen in einer Message Box anzeige, erscheint der Text korrekt.
Kann mir jemand sagen, wo hier der Fehler liegt oder ob es einen besseren / alternativen Weg dafür gibt ?
VG und vielen Dank im Voraus,
Tim