不连续单元格区域值引用后遍历问题

何洋

将不连续的单元格区域赋值给一个Range对象后，当遍历其值时我遇到了下面的问题，有哪位老师可以帮忙解答下

   
1. 当 Set rng = Range("A1:A3,C1:C3")  后，我确认了下，确实是6个单元格，但是查值时只有3个单元格格的值
     

2.使用 For Each遍历时，可以达到目的，每个值都会遍历出来：


3.使用 For 循环时，达不到目的：


4.当把不连续区域赋值给数组时，只有一部分值赋值给了数组

Enocheasty

你发错地方了，这里很冷清的！
不连续的Range里面，有个Areas属性，每个Area对应一个Range，这个Range是一个连续的Range对象。
你应该是只访问了一个Area
如果你确定你的Range是包含多个不连续的Range的话，
第一层遍历是Areas，第二层才是Cells！

LIUZHU

要加.Cells属性吧

lss001

不连续单元格区域的数组引用方式
arr = [Choose({1,2},A1:A3,C1:C3)]