选择Excel / VBA中合并单元格下方所有单元格的范围

Question

我想选择合并单元格正下方的所有单元格。

因此，例如，如果单元格A3合并到H3，那么我想选择单元格A4到H20。 我不想在选择中包括合并的单元格，所以我不能只使用Range（“ A4：H20”）。

我想要一种如何使用vba获取范围（A4：H20）的方法。 任何帮助将非常感激。

Answer 1

您可以使用MergeArea获取列数，并将其与Offset和Resize结合使用以定义范围。 例：

Sub BelowMerged()

    Dim nRows As Long, nCols As Long
    Dim rFirstCell As Range, rFinal As Range

    nRows = 17
    Set rFirstCell = ActiveSheet.Range("A3")
    nCols = rFirstCell.MergeArea.Columns.Count

    Set rFinal = rFirstCell.MergeArea.Offset(1, 0).Resize(nRows, nCols)
    rFinal.Select

End Sub