2017-10-05 78 views
1

我在做动态表(创建行和列)的公式属性动态表。总计和使用范围

我知道它的开始和结束,如下面的屏幕: enter image description here

第一行=一个

最后一行= B

第一山坳= C

最后关口= d

如何申请总计金额到最后通过使用VBA函数排像

ws.Cells(x,y).Formula = "=SUBTOTAL(9,....)"

+0

使用数据透视表。 –

+0

我需要使用VBA,我可以循环做其他的,但功能将被工作更快 – 4est

回答

2

你可以使用这样的事情:

ws.Cells(b,c).Resize(, d - c + 1).FormulaR1C1 = "=SUBTOTAL(9,R" & a + 1 & "C:R[-1]C)" 
+0

谢谢罗里,刚刚测试,它的工作! – 4est