Ms word microsoft word：不带格式复制

当我从Microsoft Word复制文本时，文本是剪贴板中的标题，我看到它包含一个段落编号。然后在另一个应用程序中，我必须手动删除该号码。 我可以只复制文本而不复制任何附加信息吗？ （当你复制一个URL时，Chrome也会自动添加一个http://地址）

试试这个

Sub FormatFreeTextCopy()
    Dim ffText As DataObject
    Set ffText = New DataObject
    ffText.setText Selection.Text
    ffText.PutInClipboard
End Sub

注意：您必须参考

使用autohotkey开源自动化软件的通用“粘贴纯文本”：

^+v::                            ; Text–only paste from ClipBoard
   Clip0 = %ClipBoardAll%
   ClipBoard = %ClipBoard%       ; Convert to text
   Send ^v                       ; For best compatibility: SendPlay
   Sleep 50                      ; Don't change clipboard while it is pasted! (Sleep > 0)
   ClipBoard = %Clip0%           ; Restore original ClipBoard
   VarSetCapacity(Clip0, 0)      ; Free memory
Return

将此代码保存到

粘贴纯文本.ahk

脚本

执行脚本

---

它将使用

Ctrl+Shift+V

快捷方式粘贴纯文本。您可以将脚本放在启动目录中，以便在Windows启动时加载它。

方法1:-

一种方法是鼠标右键单击并使用此“粘贴特殊”选项

方法2:- 为此操作指定快捷方式（Ctrl+Shift+V）（注意：默认情况下，Ms word不会为其设置快捷方式，因此我们需要自己设置它。）

• 文件

  选项

  自定义功能区

  键盘快捷键：自定义。

• 在左侧的

  类别

  列表部分，单击

  所有命令

• 在右

  命令

  列表下，选择用于

  PasteTextOnly

• 然后将

  PasteTextOnly

  的键盘快捷键设置为Ctrl+Shift+V

方法3永久/默认设置

使用此选项，默认情况下每次都将粘贴为纯文本

---

我把它放在哪里以及如何使用它？我可以为此分配快捷键吗？您可以将其放入

模块

或

此文档

中，然后可以将其分配给键盘快捷键。我得到一个编译错误：用户定义的类型不是defined@Michael-您引用了Microsoft Forms对象库？您是对的-我引用了一个wring dll。它现在正在工作。谢谢。这将是超级用户论坛中一个问题的更好答案。