我必须从工作表 1 的 U、AR 和 BF 列复制数据并将其粘贴到工作表 2 中的 A、B、C 列。为此我需要一个 vba 宏代码。
提前致谢。
看着
如何使用 Excel 中的 VBA 将列从一张工作表复制到另一张工作表?
Sub foo1()
Dim src As Worksheet
Dim trg As Worksheet
Dim LastRow As Long
Set src = ThisWorkbook.Worksheets("Sheet1")
Set trg = ThisWorkbook.Worksheets("Sheet2")
src.Range("U:U").Copy Destination:=trg.Range("A1")
src.Range("AR:AR").Copy Destination:=trg.Range("B1")
src.Range("BF:BF").Copy Destination:=trg.Range("C1")
End Sub
本文收集自互联网,转载请注明来源。
如有侵权,请联系 [email protected] 删除。
我来说两句