word 快速给选中内容添加引号

最近改论文的时候, 经常需要给特定的内容添加引号. vscode 等编辑器使用多了就很希望 word 也能有给选中内容快速添加引号的功能

这个需求我们可以使用宏快速实现

步骤

1. 点击 视图 => 宏 => 创建

2. 在编辑器中输入以下内容

   Sub AddQuotes()
   
       Dim sBegQ As String
       Dim sEndQ As String
   
       sBegQ = "“"
       sEndQ = "”"
   
       Selection.InsertBefore sBegQ
       Selection.InsertAfter sEndQ
   End Sub

3. 在文件 => 选项 => 自定义工作区 => 键盘快捷方式-自定义 中 , 类别选择宏, 宏选择刚刚添加的宏,然后在请按新快捷键中绑定一个快捷键, 点击指定快捷键后关闭页面即可.

4. 然后即可选中文字按快捷键插入引号了.🎉🎉🎉