这里使用的是内置函数CheckSpelling，检查输入的单词是否拼写正确

如果输入的单词错误，即会标记单元格为红色底色。正确的会标记为黄色背景色。

作者：Excel小子-Office中国

Excel检查单词拼写是否正确操作动画

  Excel检查单词拼写是否正确详细VBA代码：               

        Private Sub Worksheet_SelectionChange(ByVal Target As Range)

        Dim rg As Range

        For Each rg In Target

                If Not Application.CheckSpelling(StrConv(rg.Value, vbProperCase)) Then

                    rg.Interior.ColorIndex = 3

                Else

                    rg.Interior.ColorIndex = 6

                    rg.Font.ColorIndex = 5

                End If

        Next rg

        End Sub