1、如下所示，现在需将B列中大于80分的数据提取出来，拼接成如下格式：姓名，分数；拼接成的语句保存到excel单元格中。数据提取其实有很多方式，本文使用vb脚本进行提取是为了当ab列添加或者删除数据后能够快速的得出结果,并且拼接为特定格式可以复制出来供其他用处。
2、因未启用宏的工作薄不能保存宏及vb工程。所以若则需要先将excel保存成启用宏的格式。将第一步中xls格式或者xlsx格式的excel点击【文件→另存为】，【保存类型】选择“Excel启用宏的工作薄”
3、打开第二步中保存的工作薄。点击excel的【开发工具→Visual Basic】打开vb脚本编辑器
4、在打开的脚本编辑器中，点击【插入→模块】
5、打开页面中输入如下代码，见截图中部分代码进行了备注，根据实际需要修改。
Function pinjie(fanwei) arr = fanwei For i = 1 To UBound(arr) If arr(i, 2) > 80 Then p = p & arr(i, 1) & "：" & arr(i, 2) & "；" End If Next i pinjie = Left(p, Len(p) - 1)
End Function
6、保存代码后返回到excel中，在需要保存结果的单元格中调用编写好的函数。输入函数=pinjie(A:B)，按回车之后，自动计算出结果。
7、计算出结果如下所示:
8、若想让输出结果换行显示，输出结果如下图所示，则只需将代码进行简单的修改即可，见截图。
