excel - 如何将单元格中的值作为 Range 函数的输入传递？

Question

我有一个 Excel 电子表格，里面有 3 张纸，我需要复制某些单元格范围Sheet1并将其复制到Sheet2.

而且我正在尝试将要复制的单元格范围作为表 3 中可用的单元格中的输入进行复制。就像单元格中包含值A4:X6一样。但是我无法在我的宏代码中将输入值传递给 Range 函数。

下面是我的代码，当我执行时，它只是在 Sheet 2 中输入一个空行

Sub CopyData()
    Sheet3.Select
    Set Range1 = Range(Cells(3, 3).Value)
    Sheet1.Select
    Range1.Copy
    Sheet2.Select
    Range("A2").Select
    Range("A2").EntireRow.Insert Shift:=xlShiftDown
End Sub

我希望将 中表示的单元格内容Range1复制Sheet1并粘贴到Sheet2.

先感谢您！

标签： excelvbamacos

Answer 1

使用Set Range1 = Sheet3.Range(Cells(3, 3).Value)代替Set Range1 = Range(Cells(3, 3).Value)或选择范围是sheet1因为Sheet1.Select