小编Hol*_*sen的帖子

我在 Windows 10 64 位下使用 Office 365。我正在尝试清除剪贴板。宏录制器产生一个空的子。

以下尝试主要来自如何使用 VBA 清除 Office 剪贴板：

Option Explicit\nPublic Declare Function OpenClipboard Lib "user32" (ByVal hwnd As Long) As Long\nPublic Declare Function EmptyClipboard Lib "user32" () As Long\nPublic Declare Function CloseClipboard Lib "user32" () As Long\n\nPublic Sub ClearClipboardA()\n    Application.CutCopyMode = False\nEnd Sub\n\nPublic Sub ClearClipBoardB()\n    \' Source: http://www.vbaexpress.com/kb/getarticle.php?kb_id=462\n    Dim oData As New DataObject\n    oData.SetText Text:=Empty \' Clear\n    oData.PutInClipboard \' Putting empty text into the clipboard to empty it\nEnd Sub\n\nPublic Sub ClearClipboardC()\n    OpenClipboard …