如何使用 VBA(特别是 Word VBA)清除 Microsoft Office 剪贴板?我一次将大量数据复制到剪贴板中,并且不希望过多的数据保留在剪贴板中。
如何使用 VBA(特别是 Word VBA)清除 Microsoft Office 剪贴板?
我一次将大量数据复制到剪贴板中,并且不希望过多的数据保留在剪贴板中。
在另一篇文章中看到这一点,并且我已经使用 Word VBA 对其进行了测试。
'Clearing the Office Clipboard
Dim oData As New DataObject 'object to use the clipboard
oData.SetText text:=Empty 'Clear
oData.PutInClipboard 'take in the clipboard to empty it
只需将其复制并粘贴到您需要清除剪贴板的任何位置即可。
我注意到的另一件事是,当我使用 .Quit
程序(例如 Excel)时,它会不断询问我是否要保留剪贴板中的数据。一种解决方法是使用上述代码清除剪贴板。见下文:
'Clearing the Office Clipboard
Dim oData As New DataObject 'object to use the clipboard
oData.SetText text:=Empty 'Clear
oData.PutInClipboard 'take in the clipboard to empty it
'You can also just remove the Alert Messages from the Excel Program while
'the code is running
'Remove alert Messages from the Excel Program when closing
ExcelProgram.DisplayAlerts = False
'Quiting the Excel Application
ExcelProgram.Quit
我在 VBA 代码中使用了上述示例从 Excel 文件导入数据。请参见 此处