在VBA中查找列数据中的最接近值

Question

我写了vba代码来检查数据范围内的最接近的值。

例如：在工作表中（＆＃34; Sheet6＆＃34;）我的值为31.848 和工作表（＆＃34; Z73＆＃34;）我有列表值 65.47 31.74 54.56 0.16 35.71 26.78 56.54 47.62 39.68 1.55 15.87 32.55 17.86

所以我需要取最接近31.848的值。

请帮我处理宏代码。

Answer 1

您问题的一般解决方案如下：

A = 31.848
for each value in your list:
  if |A - B| < C then
    C = |A - B|
  end if
next value

您的解决方案将存储在C。

中

这是伪代码，它不会解决您的问题。

至于实际代码，正如@braX所说的那样，我们需要知道你到目前为止所尝试的内容，你到底陷入了什么以及你的vba技能是什么，所以我们知道从哪里开始我们的帮助。