excel表格怎么利用vba自动填充公式

如题所述

如图,比如要在C1:C9写入公式,代码为:

Sub DD()
Dim I As Integer
For I = 1 To 9
    Range("C" & I).Value = "=sumif(a1:a9," & "a" & I & ",b1:b9)"
Next
End Sub

温馨提示:答案为网友推荐,仅供参考