Dim daoStr As DataObject
Dim strCB As String, strTemp As String
Set daoStr = New DataObject
daoStr.GetFromClipboard
strCB = daoStr.GetText
textbox1=strCB
If this is for multiple textboxes, then better stick to keyboard comands.
The code I showed you should be used for one textbox only. I used a
comanddbutton
Or you have to trace which control has the focus.If Interested, google on
traceFocus.