相关疑难解决方法(0)

如何从调用VBA函数的单元格中获取？

换句话说,什么是INDIRECT(ROW(),COLUMN())的VBA等价物？

我不是在寻找ActiveCell.

我想要做的是有一个简单的函数ThisRow_Col(rColumn As String)返回它所调用的行的列X. 比如在B2中我调用= ThisRow_Col("A"),它应该返回A2的值.无论哪个单元活动,这都应该有效.

编辑:谢谢Charles的答案:Application.Caller.以下代码获取当前行的列X,与选择的位置无关:

Function ThisRow_Col(rColumn As Range)
    ' Return INDIRECT(rcolumn & ROW())

    ThisRow_Col = Application.Caller.Worksheet.Cells(Application.Caller.Row, rColumn.Column).Value

End Function

请注意,将列作为Range(ThisRow_Col(A1))传递比将其作为字符串传递更好,因为如果移动或插入列,Excel可以自动更新公式.当然,这一1行A1只是一个惯例.

像往常一样,我使用On Error Goto语句创建一个错误处理程序,在那里我放了几行清理代码并显示错误信息,但现在我不想失去默认处理程序的舒适度,它也指向我的确切行发生错误的地方.我怎样才能做到这一点？

提前致谢.

是否有一个函数来获取调用VBA函数的单元格的地址？

我使用了"Application.ActiveCell.Address",但发现这种方法不是获取调用单元格地址的正确方法.

例如:如果我们有带保存的VBA功能的Excel工作表,重新打开工作表后,上述方法将无法工作.

请帮忙

尼莫