Excel VBA 如何调用正常的函数 如 subtotal sum

Question

Sub 宏1()

Range("D7").Select '下面公式中的 11 我想换成非空单元格最后的行怎么换？ 直接换成 i ，貌似不行
ActiveCell.FormulaR1C1 = "=SUBTOTAL(9,R[4]C:R[11]C)"
Range("F7").Select
ActiveCell.FormulaR1C1 = "=VLOOKUP(RC[-1],RC[2]:R[9]C[3],2,0)"
Range("F8").Select
End Sub 谁帮我解释解释里面的单元格是怎么定位的。=SUBTOTAL(9,R[4]C:R[11]C)=SUBTOTAL(9,D11:D18)参数之间是啥么关系？

Answer 1

某一列的最后一个非空单元格的行：A列：I=RANGE("A65536").END(XLUP).ROW 即从65536行开始往上找调用工作表函数使用：APPLICATION.SUM()或者WORKSHEETFUNCTION.SUM()公式中R[4]C:R[11]C R代表行，C代表列。自己录制一个宏，对应一下就看懂了。