将列从一个Excel工作表复制到另一个Excel工作表

Question

我想将特定列从一个Excel工作表复制到另一个工作簿中的另一个Excel工作表。如何使用宏将某些列复制到不同的Excel工作表？

Answer 1

假设您有两个工作簿（源和目标），并且您希望将源工作簿中的A列复制到目标工作簿中的A列。

Sub CopyColumnToWorkbook()
    Dim sourceColumn As Range, targetColumn As Range

    Set sourceColumn = Workbooks("Source").Worksheets("Sheet1").Columns("A")
    Set targetColumn = Workbooks("Target").Worksheets("Sheet1").Columns("A")

    sourceColumn.Copy Destination:=targetColumn
End Sub

显然，您可以根据需要更改列。