excel - 如何引用非连续 Excel 范围中的第 n 个区域？

Question

假设我选择了 range A1:B2,C3:C5。

使用 VBA，我可以像这样遍历每个区域：

Dim iArea As Range
For Each iArea In Application.Selection.Areas
    Debug.Print iArea.Address
Next iArea

我能够返回每个范围的地址，在这种情况下$A$1:$B$2和$C$3:$C$5.

如何引用范围内的第二个区域，或者更好的是，第 n 个区域？我可以使用 引用范围内的第 n 个单元格Range.Cells(cellNumberToReturn)。范围是否类似？

Answer 1

只需使用索引器：

Sub F()

    Dim rng As Range
    Dim rngArea As Range

    Set rng = Range("A1:B2,D3:E5")
    Set rngArea = rng.Areas(2)
    MsgBox rngArea.Address(0, 0) 'Shows D3:E5

End Sub