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
1 回答
假设您有两个工作簿(源和目标),并且您希望将源工作簿中的A列复制到目标工作簿中的A列 .
显然,您可以根据需要更改列 .