1、一、实现功能要求：求总分。1、在Excel界面中，初始数据如下：
3、接下来，将对此错误进行处理；4、修改代码为：Sub OnErrorResume()Dim i%On Error Resume Next '错误时则恢复；For i = 2 To 6:Sheet4.Range("d" & i) = Sheet4.Range("b" & i) + Sheet4.Range("c" & i)NextEnd Sub
4、点击插入--形状，选择一个形状；6、选择形状，右键指定宏，选择刚刚定义的宏OnErrorResume；
5、运行宏；则在有字符串的行中，将不执行，继续执行后面的语句；
7、综上所述，本文提供两种方法：1、On Error Resume Next:忽略错误；2、On Error GoTo line:错误时跳转到其他执行语句；来对错误语句进行处理。