在 excel 中使用 alt + f11 把 vba 界面打开,然后添加模块,在模块中写自己定义的函数
示例代码
Function normalize(current, r As range)
max = 0
min = 1000
For Each b In r
If b.Value > max Then max = b.Value
If b.Value < min Then min = b.Value
Next
normalize = (current - min) / (max - min)
End Function
在单元格里可以直接调用
= normalize(D2,D$2:D$10)