使用 vba 宏代码将特定列从一张表复制到另一张表答案

【问题标题】：Copy specific columns from one sheet to another using vba macro code使用 vba 宏代码将特定列从一张表复制到另一张表
【发布时间】：2017-10-30 06:37:31
【问题描述】：

我必须从工作表 1 中的 U、AR 和 BF 列复制数据并将其粘贴到工作表 2 的 A、B、C 列。我需要一个 vba 宏代码。

提前致谢。

【问题讨论】：

U, AR 和 BF 是列名还是索引？
索引。 @AbhinavRawat
这不是代码编写服务，你知道吗？您的具体问题是什么？
我的代码不起作用。这就是我在这里问的原因
问题很明确。我必须从工作表 1 中的 U、AR 和 BF 列复制数据并将其粘贴到工作表 2 中的 A、B 和 C 列

标签： vba excel

【解决方案1】：

看看

How can I copy columns from one sheet to another with VBA in Excel?

How to record macro in excel

 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

【讨论】：

如果您声明Dim LastRow, i As Long，那么只有i 的类型为Long，但LastRow 将是Variant，它与Dim LastRow As Variant, i As Long 完全相同。您需要为每个变量指定类型，例如 Dim LastRow As Long, i As Long，否则 Excel 始终假定为 Variant!
@Peh 哦！我不知道，谢谢分享，我会记住的:)
很抱歉，@AbhinavRawat 这给了我一个巨大的错误。当我运行宏时，它只移动第三列。
其他 2 列被第三列替换
@RavindraSinghRawat 立即尝试