excel - 公式中使用的自定义 vba 函数中当前单元格的范围

Question

我想编写一个Foo可以在公式中使用的函数，以返回使用它的单元格上方的单元格的内容。

例如，如果在单元格 B2 中，我写=Foo()我想获取 B1 的内容。

我知道我可以=B1直接写。显然，我在这里简化了案例。

那么，这个功能是什么样子的。

更准确地说，我希望（也）能够从其他函数中使用这个函数（例如Bar(factor)，将上面的单元格相乘的函数，所以我可以写=Bar(2)）

Answer 1

这通常是一个坏主意，因为您将不得不使函数不稳定，对计算等产生连锁反应。

Public Function Foo() As Variant
    Application.Volatile
    Foo = Application.Caller.Offset(-1, 0)
End Function

Answer 2

这有效

Public Function Foo() As Variant
    Foo = Application.ThisCell.Offset(-1, 0)
End Function