拼写检查这个功能，在Excel中会自动进行，如果你设置了的话大多情况下，并不太注意，Excel对字符进行检查的依据是词典，具体词典在哪里？可以到选项-校对里找到，运行的时候系统自已对应设置的词典进行检查，如果找不到，拼写检查就不能正常进行。
当然了，词典也可以是自己定义的字符串，也就是说，你可以定义一些喜欢的字符作为字典单词来进行检查。
重点说一下，如何用vba代码进行字符串检查，执行字符串检查的好处，就是可以使我们编辑的内容避免出错。下面看一下拼写检查的语法，如下图所示：
CheckSpelling方法方法有三个参数，第一个是要进行拼写检查的单词，第二个就是自定义词典名，第三个定义大写字母是否检查，True为检查，False为忽略下图为一个示例，检查第二列是否有拼写错误，然后把检查结果写到第三列和第四列。
看图对照理解一下：
代码：Private Sub CommandButton1_Click() 拼写检查 Dim r As Range Set r = ActiveSheet.Columns(2) Dim c AsLong
, i AsLong c = Application.WorksheetFunction.CountA(r) For i = 2To c + 1If VBA.Len(r.Cells(i, 1)) = 0
ThenGoTo Jop If Application.CheckSpelling(VBA.CStr(r.Cells(i, 1).Value), True, True) = FalseThen r.Cells(i,
1).Offset(0, 1).Value = "Sorry" r.Cells(i, 1).Offset(0, 2).Value = "错误"Else r.Cells(i,
1).Offset(0, 1).Value = "Yes" r.Cells(i, 1).Offset(0, 2).Value = "正确"EndIf Jop: Next i MsgBox
"检查拼写完成", vbInformation, "提示"End Sub
本节介绍的CheckSpelling方法是基于Application对象之下的方法，Range对象、Worksheet对象下面也有同样的CheckSpelling方法,应用方法和属性基本相同，有兴趣可以对照学习一下。
欢迎关注、收藏---END---
发表评论:
◎欢迎参与讨论，请在这里发表您的看法、交流您的观点。