No.1
ForEach循环语句是很多编程语言里的一个通用语句，使用方法大同小异，对于熟悉编程的人来说，并不是什么难理解的。
下面介绍一下其重点应用方法。
No.2
语法如下图所示
解释
如果_组_中有至少一个元素，则进入“For…Each”****块。在进入循环后,循环中的所有语句都将对_group_中的第一个元素执行。
如果_组_中有多个元素，则继续为每个元素执行循环中的语句。组中不再有元素时，退出循环并继续执行“Next”****语句后的语句。
遍历数组
DimxArr,x,yxArr=Array("A","B","C")ForEachxinxArry=xify="B"thenexitforNextx上面代码解释为，遍历数组xArr，当遍历到数组中有一个字符为"B"的值时，就退出循环。
其中变量x，为暂存变量，为Variant可变类型变量。
当然ForEach循环也可以遍历对象，如下例子在Range对象中进行遍历。
遍历数组
DimcellasRange,xcellRangesetcell=Range("A1:A10")ForEachxcellincellifxcell.value=""thenExitForNextxcell上面例子中遍历Range对象cell中的值，如果值为""则退出循环。
本节示例对表中的数值进行乘法和加法计算，具体代码可看下图：
No.3
循环语句应用十分普遍，所以要学会并熟练运用循环语句是vba编程很重要的一个技能，如果要做一个优秀的应用系统，肯定离不开循环语句的使用。