Paste, PutInClipboard, SetText methods example
The following example demonstrates data movement from a TextBox to a DataObject, from a DataObject to the Clipboard, and from the Clipboard to another TextBox.
The PutInClipboard method transfers the data from a DataObject to the Clipboard. The SetText and Paste methods are also used.
To use this example, copy this sample code to the Declarations portion of a form. Make sure that the form contains:
- Two TextBox controls named TextBox1 and TextBox2.
- A CommandButton named CommandButton1.
Dim MyData As DataObject
Private Sub CommandButton1_Click()
Set MyData = New DataObject
MyData.SetText TextBox1.Text
MyData.PutInClipboard
TextBox2.Paste
End Sub
Private Sub UserForm_Initialize()
TextBox1.Text = "Move this data to a " _
& "DataObject, to the Clipboard, then to " _
& "TextBox2!"
End Sub
Support and feedback
Have questions or feedback about Office VBA or this documentation? Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.