Excel VBA 循环结构基础:计数器与累加器

之前文章讲了在Excel VBA中的两种循环语句,for与do while循环,并且做了个把数字从1到20依次填充到单元格区域的案例 。今天继续讲循环结构基础部分内容,如何在循环结构中实现对数据的汇总,这里需要用到计数器与累加器的概念 。
来看一下今天的案例,打开 “咸将输出” Excel工作表,在表格里面的黄色区域内依次统计咸将的出现人数及总输出伤害:

Excel VBA 循环结构基础:计数器与累加器

如果用函数的话非常容易做的,用COUNTA与SUM函数就能解决,这个在工作中如果用VBA来计算就完全没必要,有点舍近求远的感觉 。这里是为了教学需要进行演示 , 来看一下这里的汇总求和在VBA里代码要怎么来写 。
写入以下代码:
Sub zzz()Dim i As Integer计数器 = 0累加器 = 0i = 3Do While Range("C" & i) <> ""计数器 = 计数器1累加器 = 累加器Range("D" & i)i = i1LoopRange("E10") = 计数器Range("F10") = 累加器End Sub
Excel VBA 循环结构基础:计数器与累加器

运行后看一下结果:
Excel VBA 循环结构基础:计数器与累加器

结果是完全正确的,这就是计数器与累加器的汇总方法 , 怎么更容易理解它们呢?其实计数器与累加器它们就是变量,等同于代码里的 i,这里一共就用到了3个变量,i 控制了循环次数,计数器与累加器的初始值为0 , 计数器很好理解每次统计加上1代表人数,累加器就是每次扫描到的单元格里的值就存到这个变量,循环语句运行一次在累加器里就存进去一次 , 不断累加 , 最后得到汇总结果 。
【Excel VBA 循环结构基础:计数器与累加器】今天的循环语句中计数器与累加器的基本概念就介绍到这里,案例是最基础的 , 只有基础打牢固了以后就能用VBA来应对更复杂的业务,感谢阅读 。

相关经验推荐