关于VBA的数量计算问题嗯,问题是这样的,在A1：A100中都填了数字,都是0~30之间的整数然后想要计算总共有多少个数据用的是application.worksheetfuncion.count(range("A1:A100"))现在的情况是,如果只要计算

Question

关于VBA的数量计算问题
嗯,问题是这样的,在A1：A100中都填了数字,都是0~30之间的整数
然后想要计算总共有多少个数据用的是
application.worksheetfuncion.count(range("A1:A100"))
现在的情况是,如果只要计算一定条件内的数据的数量要怎么算?
假定说B2给的个数字要求下限=3,B3给了个数字要求上限=20,那要如何计算3～20之间的数据的数量?
用if还是while?应该怎么用?

Answer 1

你的例子中实际上使用的是Excel的内置函数,也就是相当于调用了面板上的求和按钮,同理你可以使用sumif函数来解决,具体使用方法可以查看帮助文件,我这里给你简单用一下直接在表格里使用的格式
=SUMIF(A1:A100,">=3")-SUMIF(A1:A100,">20")
下面具体介绍你所问的VBA的使用
假设一个变量sum为你要求的和
这种逐行增长的（例子中1到100）的循环使用for结构最好,假设行数为i,那么就是,
for i=0 to 100
在for结构中嵌套if判断语句,当数值在3和20之间时,
sum=cell(1,i)+sum
这样循环到100就行了
当然,这里使用for each结构更加简单
先假设一个对象变量
Dim myCell As Range
Dim sum As Long
For Each myCell In Range("A1:A100")
If 3