自动拼写检查器在Microsoft Excel 2010
如果您想知道如何使Excel能够对数据进行拼写检查(键入错误),在本文中,您将学习如何使用VBA在Excel中自动进行拼写检查。
让我们以一个例子来理解:
我们在A列中包含文本。请参见下面的快照
在上面的快照中;在单元格A5和A11中,您会看到拼写错误。
目的是用红色突出显示错误。
单击“开发人员”选项卡。从“代码”组中,选择“ Visual Basic”
或按ALT + F11快捷键以启动VB编辑器屏幕。
在当前工作表中输入以下代码。
私人子Worksheet_Change(按目标的ByVal目标)
昏暗的Myrange作为范围
如果不相交(目标,范围(“ A1”)。CurrentRegion)没有,则
对于Range(“ A1”)中的每个Myrange。CurrentRegion
如果Application.CheckSpelling(Myrange)= False,则
Myrange.Font.Color = vbRed
其他:Myrange.Font.Color = vbBlack
如果
结束
下一个
如果
结束
结束子
编写完上述代码后,单元格A5和A11将变成红色。
该代码适用于当前区域。如果文本在当前区域中,则上面的VBA代码将帮助用户识别错误。
如果用户想突出显示特定单元格上的错误,那么我们将使用以下代码:
私人子Worksheet_Change(按目标的ByVal目标)
昏暗的Myrange作为范围
如果不相交(目标,范围(“ A1,B3,C5”)),则
对于联合中的每个Myrange([A1],[B3],[C5])
如果Application.CheckSpelling(Myrange)= False,则
Myrange.Font.Color = vbRed
其他:Myrange.Font.Color = vbBlack
如果
结束
下一个
如果
结束
结束子
这里,在上面显示的快照中,代码突出显示了单元格B3和C5中的错误。不在单元格C1和C7中。这是因为我们希望代码检查单元格A1,B3和C5。
这样,您可以使用VBA代码突出显示错误。