vba - 在 VBA 中检查 Excel 工作表的拼写

Question

我在互联网上搜索了一些可能的解决方案，但我也想在这里询问。

目标是单击一个按钮，并对整个工作表进行拼写检查。

这是一些代码

Sub spellCheck()

Sheet1.Cells.CheckSpelling
End Sub

另外，我发现了这个:

Sub SpellCheck()
Dim Checkword As String, Result As Boolean
Checkword = Selection.Value
Result = Application.CheckSpelling(Checkword)
Selection.Offset(0, 1) = Result
End Sub

有什么想法吗？两者都不适合我。谢谢!

Answer 1

您可以通过执行以下操作来检查整个工作簿:

Sub SpellCheck()

For Each sh In Worksheets
    Sheets(sh.Name).Cells.CheckSpelling
Next

End Sub

这将循环浏览整本书中的每张纸，并对每张纸进行拼写检查。我还不知道如何使拼写检查器实际移动到拼写错误的位置。因此，通过上面的内容，您只会得到一个拼写错误列表，没有上下文来评估它们。