将列从一个 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

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