R[4]C:R[11]C是R1C1样式。。
你代码中先选择了D7.
Range("D7").Select
下面的代码
ActiveCell.FormulaR1C1 = "=SUBTOTAL(9,R[4]C:R[11]C)"
表示在D7里面写入公式:
"=SUBTOTAL(9,R[4]C:R[11]C)"
R[4]C:R[11]C
中的R[4]C 表示相对于D7向下偏移4行,列不变,即D11,
R[11]C 表示相对于D7向下偏移11行,列不变,D18
所以呢 "=SUBTOTAL(9,R[4]C:R[11]C)"就等于=SUBTOTAL(9,D11:D18)
余下的类推即可
假如你要调用 Power函数,用这个语句 Application.WorksheetFunction.Power(x,y) 。其他函数也是一样的