VBA复制按钮可从文本框中复制文本

问题描述

| 我需要创建一个复制按钮来复制以前在文本框中插入的文本，所有这些都在excell中     

解决方法

        假设您有一个名为

TextBox1

的TextBox和一个名为

CommandButton1

的CommandButton：

Private Sub CommandButton1_Click()
    Dim MyData As New DataObject
    MyData.SetText TextBox1.Text
    MyData.PutInClipboard
End Sub

单击CommandButton1后，可以将TextBox1上的文本粘贴到任何适当的位置。