要创建一个简单的自动宏拼写检查?
To to create a simple automated macro spell check?
我想在“开发人员”选项卡下使用 Visual Basic 在 word 中创建自动宏拼写检查。我知道用于常规拼写检查的宏按钮后面的编码是
Sub SpellC()
'
' Macro3 Macro
'
'
If Options.CheckGrammarWithSpelling = True Then
ActiveDocument.CheckGrammar
Else
ActiveDocument.CheckSpelling
End If
End Sub
但我的问题是,当我关闭 MS Word 并同时打开文档时,如何将其修改为 运行。如果可能的话,我如何修改它以在我输入不正确的单词时立即执行,以在拼写错误时向我显示 MS Word 提供的单词选项列表。请不要气馁,我只是想在这里学习。
- 打开VBA编辑器
- 转到项目资源管理器
- 双击 ThisDocument
- Select 文档,从对象和事件下拉菜单打开以创建用于打开文档的子项
- Document Close 事件的方法相同
请参阅此 article 了解更多详情
它应该是这样的:
Private Sub Document_Open()
Call SpellC()
End Sub
Private Sub Document_Close()
Call SpellC()
End Sub
我想在“开发人员”选项卡下使用 Visual Basic 在 word 中创建自动宏拼写检查。我知道用于常规拼写检查的宏按钮后面的编码是
Sub SpellC()
'
' Macro3 Macro
'
'
If Options.CheckGrammarWithSpelling = True Then
ActiveDocument.CheckGrammar
Else
ActiveDocument.CheckSpelling
End If
End Sub
但我的问题是,当我关闭 MS Word 并同时打开文档时,如何将其修改为 运行。如果可能的话,我如何修改它以在我输入不正确的单词时立即执行,以在拼写错误时向我显示 MS Word 提供的单词选项列表。请不要气馁,我只是想在这里学习。
- 打开VBA编辑器
- 转到项目资源管理器
- 双击 ThisDocument
- Select 文档,从对象和事件下拉菜单打开以创建用于打开文档的子项
- Document Close 事件的方法相同
请参阅此 article 了解更多详情
它应该是这样的:
Private Sub Document_Open()
Call SpellC()
End Sub
Private Sub Document_Close()
Call SpellC()
End Sub