当前位置：你问我答网 > 体育

如何使用vba将excel自动筛选并对筛选的数据列求和？

2020-07-11 体育 353阅读
筛选后求和的公式是
=SUBTOTAL(9,B2:B99)
对AB列进行筛选，筛选A列的“a”，并求和的代码如下：
Sub xxx()
ActiveSheet.Range("$A$1:$B$999").AutoFilter Field:=1, Criteria1:="a"
Dim xRng As Range
Set xRng = Range("B2:B999")
MsgBox WorksheetFunction.Subtotal(9, xRng)
End Sub
声明：你问我答网所有作品（图文、音视频）均由用户自行上传分享，仅供网友学习交流。若您的权利被侵害，请联系fangmu6661024@163.com
0

猜你喜欢