从'sheet1'上的单元格区域复制到'sheetB3'上的相同范围

时间:2017-05-09 05:14:32

标签: excel vba excel-vba

我很难制定标题,但我会在这里解释得更好。

我想要做的是使用我从按钮点击激活的VBA宏,将在sheet1上的B13:E52范围内找到的数据复制到工作表“B3”上的相同范围,其中找到B3在sheet1上包含我要复制到的工作表名称。这会根据列表中选择的项目动态更新。

我知道如何创建我的按钮,在工作表之间复制等,但我很难弄清楚如何在VBA中引用B3中包含的目标工作表名称。

2 个答案:

答案 0 :(得分:1)

with sheet1
    .range("b13:e52").copy sheets(.range("b3").value).range("b13")
end with 

答案 1 :(得分:0)

如果您只想复制vlaues(没有格式或公式),那么您可以使用:

With Worksheets("Sheet1")
    Worksheets(.Range("B3").Value).Range("B13:E52").Value = .Range("B13:E52").Value
End With