学习Excel技术,关注微信公众号:
excelperfect
在上篇文章中,我们展示了自定义函数有效的方式是通过将单元格区域读取到Variant型数组来传递单元格区域数据。本文将介绍在自定义函数中最有效的方式是使用Excel内置函数。
线性插值是一种常用技术,用来查找缺失值或者计算两个值之间的值。例如下表:
图1
现在,想要知道Level的66.25对应的Flow1的值是多少?假设该值在66的Level对应的Flow1值6.19与66.5的Level对应的Flow1值8.64构成的直线上,可以计算66.25对应的Flow1的值如下:
8.64与6.19之差是2.45,66.25是66与66.5之间的中间值,所以将2.45的一半加上6.19得到7.415。
公式为:
=6.19+(8.64-6.19)*(66.25-66.0)/(66.5-66.0)
编写一个简单的自定义函数如下:
Function VINTERPOLATEA(Lookup_ValueAs Variant, _
Table_Array As Range, _
Col_Num