☰

如何在Word 2010中快速切换智能引号？

tag-icon • tag-icon microsoft-word keyboard-shortcuts microsoft-word-2010 smart-quotes
如何在Word 2010中快速切换智能引号？

我正在处理一份很长的技术文档，其中包含大量计算机代码。在连续文本中，我希望引号是花括号，这意味着我需要启用 Word 的“智能引号”自动格式化功能。但在代码显示中，花括号是不正确的，因此在这些情况下，我希望禁用智能引号。有没有快速切换此设置的方法？或者有没有办法将它与我所处的段落样式联系起来？（我使用一种独特的代码显示样式。）

目前，要切换设置，我必须单击文件>选项>校对>自动更正选项...>“直引号”和“智能引号”>确定>确定，这需要单击鼠标七次。切换回来又需要单击鼠标七次。有没有更快的方法？使用键盘快捷键进行切换或使用工具栏按钮单击即可切换，这很棒。让设置取决于我所处的段落样式会更好。

答案1

好的，答案如下：

  1. 转到View标签 > Macros>Record Macro
  2. 给宏命名并将其分配给一个键/快捷键（组合键）
  3. 录制一些内容（无论什么，我们稍后都会重置）。单击Macros>Stop Recording停止。
  4. 重复步骤 1-3 以创建另一个宏（因此我们现在总共有 2 个宏）。
  5. 转到View标签 > Macros>View Macros
  6. 选择第一个宏并单击Edit
  7. 删除宏代码（Visual Basic）中的所有行，除了sub Macro_Name()和End Sub
  8. 将此行复制到子文件中：Options.AutoFormatReplaceQuotes = True
  9. 对另一个宏执行相同操作，但Options.AutoFormatReplaceQuotes = False改为写入。

最终，这就是代码（您可能对宏有其他名称和/或描述）： 还要注意，在 Visual Basic 中，'定义注释行（通常会将该行变为绿色），意味着该行将不是被处决。

 Sub ToggleQuotes1()
'
' ToggleQuotes1 Macro
' Smart Quotes
'
    Options.AutoFormatReplaceQuotes = True
End Sub
Sub ToggleQuotes2()
'
' ToggleQuotes2 Macro
' Regular quotes 
'
    Options.AutoFormatReplaceQuotes = False
End Sub

PS - 校对下有两个智能引号选项。一个在选项AutoFormat卡下，另一个在AutoFormat as you type。这里我更改了第一个，但第二个是这样的： Options.AutoFormatAsYouTypeReplaceQuotes = True Options.AutoFormatAsYouTypeReplaceQuotes = False

答案2

您只需一个包含以下行的宏即可做到这一点

选项.AutoFormatAsYouTypeReplaceQuotes = 非选项.AutoFormatAsYouTypeReplaceQuotes

相关内容