如何从调用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
Run Code Online (Sandbox Code Playgroud)
请注意,将列作为Range(ThisRow_Col(A1))传递比将其作为字符串传递更好,因为如果移动或插入列,Excel可以自动更新公式.当然,这一1行A1只是一个惯例.
UPDATE prodfeatures2 SET featureprice = featureprice * 0.6316;
Run Code Online (Sandbox Code Playgroud)
我正在尝试设置一轮到最接近的百位。帮助!
我不希望答案是 104.7648,我希望它是 104.76。
我不希望答案是 104.7668,我希望它是 104.77。
将浮点类型转换为整数类型的建议方法是什么,截断小数点后的所有内容?显然,CLng回合和=运算符的文档没有提到主题.