Excel 如何在VBA中迭代不连续范围？
如何遍历Excel 如何在VBA中迭代不连续范围？,excel,vba,Excel,Vba,如何遍历rData的所有单元格中的值？您可以尝试此代码 Dim rData As Range rData = Range("Sheet1!$D$4,Sheet1!$A$6:$A$8,Sheet1!$B$4,Sheet1!$C$8") RangeObject.rData中每个rCell的区域。下一个rCell。将rCell声明为rData中每个rCell的范围@DarrenBartrup-Cook都。下一个rCell和对于rData中的每个rCell…下一个有效。有什么不同？我不认为有什么不同N
rData的所有单元格中的值？您可以尝试此代码
Dim rData As Range
rData = Range("Sheet1!$D$4,Sheet1!$A$6:$A$8,Sheet1!$B$4,Sheet1!$C$8")
RangeObject.rData中每个rCell的区域
。下一个rCell
。将rCell
声明为rData中每个rCell的范围
@DarrenBartrup-Cook都。下一个rCell
和对于rData中的每个rCell…下一个
有效。有什么不同？我不认为有什么不同Next rCell
只是明确了循环的结束位置——如果使用嵌套循环，更容易阅读。您对“三个rData单元格
”的确切含义是什么？。你的区域可以容纳更多的单元格，你是说区域。区域（1）
意思是Sheet1$在这种情况下，A$6:$A$8
。所以为了避免混淆：你的完整不连续范围对象包含四个区域，只有第二个区域包含三个单元格。
Sub a()
Dim rData As Range, cell as Range
Set rData = Sheet1.Range("D4, A6:A8, B4,C8")
For Each cell In rData
MsgBox cell
Next
End Sub