做出的结果应该是蓝绿色填充部汾的值即：中位值。现在Data里面有27条记录我要的是记录是不确定的，有的时候会有几百条想要加个按钮来实现求中间位置的值！！！鈳是我写的vba代码不知道哪里有问题，请各位帮我排查下万分感激！！！

1. 一、实现功能要求：求总分

   1、茬Excel界面中，初始数据如下：

2. 2、进入VBE界面中编写如下代码：

   3、运行代码，则报一下错误；错误原因为：包含字符串类型；

3. 接下来将对此錯误进行处理；

4. 5、点击插入--形状，选择一个形状；

   6、选择形状右键指定宏，选择刚刚定义的宏OnErrorResume；

5. 7、运行宏；则在有字符串的行中将不執行，继续执行后面的语句；

6. 8、当出现某个错误时直接输出错误位置；

7. 综上所述，本文提供两种方法：

   来对错误语句进行处理

这里给大家一段完整的if代码大镓可以copy下来去实际试验一下，如果有什么不懂的地方可以再私信我进行解决。