Question

很抱歉，如果这很明显，但我在连接两条信息时遇到了一些麻烦。

我有一个单格范围（例如，像A1）和第二个更大的范围（例如A1：C223）。我希望能够编写一些代码，这些代码将使用一个单元格的列创建一个新范围，以及更大范围的行数（因此在本例中，它最终将为A1：A223）。 / p>

我想稍后使用它来创建一个循环，但我首先要创建这个范围。任何帮助将不胜感激。

Answer 1

我想我明白你想要什么。看看是否有效：

Sub test()
Dim rangeA As Range, rangeB As Range, combRange As Range

Set rangeA = Range("A1")
Set rangeB = Range("A1:C223")

Set combRange = Range(Cells(rangeB.Rows(1).Row, rangeA.Column), _
    Cells(rangeB(rangeB.Rows.Count, 1)(1).Row, rangeA.Column))

Debug.Print combRange.address

End Sub

编辑：这可能有点太多了，看起来@SiddharthRout在评论中也有一个很好的解决方案：D

指定范围内的某个列？

1 个答案: