只有单元格参考号可用时，在EXCEL VBA中合并单元格

我已经使用了下面的vba代码来在EXCEL中以编程方式合并2个单元格：

范围（ “B2：B3”）合并。

但是，而不是如上所述的绝对单元格参考情况，我现在有一种情况，我只能使用相对单元格引用。 例如，我有variablesRow0和Col0来计算特定引用单元格的行数和列数。 所以，如果我想合并参考单元格（这可能会有所不同，从应用程序到应用程序）与右边的那个，我希望能使用像这样的东西：

Cell1 = Cells(Row0, Col0).Address Cell2 = Cells(Row0, Col0 + 1).Address Range(Cell1:Cell2).Merge 

但是，这会导致错误，因为显然会引用引号，但是，添加引号时，则不会parsingvariablesCell1和Cell2。

范围（“小区1：小区2”）合并。

任何援助表示赞赏。

谢谢，

担

Answer 1

在你的例子中改变

  Range(Cell1:Cell2).Merge 

至

  Range(cell1 & ":" & cell2).Merge 

正如你所做的那样，你正在尝试传递Range内的一个string，但是:没有被引号包围。

用引号括起来，用&连接cell1和cell2，它应该可以工作。

Answer 2

你根本不需要使用这个地址：

 Set Cell1 = Cells(Row0, Col0) Set Cell2 = Cells(Row0, Col0 + 1) Range(Cell1, Cell2).Merge 

要不就：

 Cells(Row0, Col0).Resize(1,2).Merge