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

时间:2014-12-07 18:34:42

标签: excel vba excel-vba

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

因此,例如,如果单元格A3合并到H3,那么我想要选择单元格A4到H20。 我不想在选择中包含合并的单元格,所以我不能只使用Range(" A4:H20")。

我想要一种如何使用vba获得范围(A4:H20)的方法。 任何帮助将不胜感激。

1 个答案:

答案 0 :(得分:1)

您可以使用MergeArea获取列数,并将其与OffsetResize结合使用以定义范围。例如:

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