如何在Excel中添加自定义函数（以计算AUC为例）

Excel是一个常用的数据记录与统计的工具，但是我们所熟知的可能仅仅是它的表格，画直方图等功能。它其实还有更为强大的功能，即添加自定义函数，方便自己统计。下面为简单的介绍，以Excel2016为例：

1、首先确保开发工具视图打开了，点击【文件】——>【选项】——>【自定义功能区】——>勾选【开发工具】

2、点击【开发工具】——>点击【visual Basic】（用的是VB语言）

然后会跳出一个界面，选择【插入】——>【模块】，点击

在里面输入VB的代码就可以添加自定义函数了，我以计算AUC为例：

Function AUC(ByVal a As Range, ByVal b As Range)
  Dim i As Integer
  AUC= 0
  For i = 1 To a.Rows.Count - 1
  AUC= AUC+ (Val(a(i + 1)) - Val(a(i))) * (Val(b(i)) + Val(b(i + 1))) / 2
  Next
End Function

然后保存为宏格式的.xlsm文件就可以调用了

至此就结束了Excel自定义函数的全部过程了。