VBA复制button从文本框中复制文本

我需要创build一个复制button来复制我以前插入文本框中的文本，所有这一切都在Excel中

Answer 1

考虑你有一个名为TextBox1和一个名为CommandButton1 ：

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

单击CommandButton1后，TextBox1上的文本已准备好粘贴到任何适当的位置。