粘贴后如何在Word中运行一个宏?

How to run a macro in Word after paste?

如何让 Microsoft Word 每次用户粘贴文本时都运行一个宏?

我录制了这个宏:

Sub AdjustFontSize()
'
' AdjustFontSize Macro
' Adjusts font size
'
    Selection.WholeStory
    Selection.Font.Size = 24
End Sub

这会更改文档中所有内容的字体大小,我希望在用户粘贴文本时发生这种情况。

试试这个代码。

Sub EditPaste()
    Selection.Paste
    Selection.WholeStory
    Selection.Font.Size = 24
End Sub

EditPaste 是内置命令。你可以在这里找到它。

我所做的是覆盖现有命令并将我的代码添加到其中。