Excel 2010中的VBA,将变量发送到windows剪贴板

Excel 2010中的VBA,将变量发送到windows剪贴板,vba,excel,Vba,Excel,我有以下简单的Excel宏: Sub Macro2() ' ' Macro2 Macro ' x = Selection.Address(False, False) y = ActiveSheet.Name Z = "''" & y & "'!" & x End Sub 是否可以将名为Z的字符串发送到windows剪贴板?使用以下命令后有效的代码: 这里有一些答案会有所帮助。我有点偏爱第二个,它有自包含的函数,并且后期绑定到MSForms库:非常感谢!真是不可思议!

我有以下简单的Excel宏:

Sub Macro2()
'
' Macro2 Macro
'
x = Selection.Address(False, False)
y = ActiveSheet.Name
Z = "''" & y & "'!" & x

End Sub

是否可以将名为Z的字符串发送到windows剪贴板?

使用以下命令后有效的代码:


这里有一些答案会有所帮助。我有点偏爱第二个,它有自包含的函数,并且后期绑定到MSForms库:非常感谢!真是不可思议!我以前试过搜索,但没有找到解决方案。另外,不管怎样搜索它都知道,您必须在工具中添加对Microsoft Forms 2.0库的引用-VBE中的引用。
Sub Macro2()
'
' Macro2 Macro
'
x = Selection.Address(False, False)
y = ActiveSheet.Name
Z = "''" & y & "'!" & x

With New MSForms.DataObject
    .SetText Z
    .PutInClipboard
End With

End Sub