Excel VBA联盟

Question

在Excel 2010中，如何使用VBA从两个单独的列创建两列范围？

下面的代码使用Union，但组合范围（rngAll）仅包含第一列（rng1）：

Dim rng1 As Range
Dim rng2 As Range
Dim rngAll As Range

Set rng1 = Range(TableColumn1)
Set rng2 = Range(TableColumn2)
Set rngAll = Application.Union(rng1, rng2)

感谢。

Answer 1

通过使用Range：

限定Sheet对象来尝试此操作

Set rng1 = Sheets(1).Range(TableColumn1)
Set rng2 = Sheets(1).Range(TableColumn2)
Set rngAll = Application.Union(rng1, rng2)

然后在Watch Window或Immediate Window中，您可以查看rngAll.Address。它应该显示两个范围。