excel - 将单独 Excel 文件中的值复制到单独的 Excel 工作表中

Question

我有ABC1Excel 文件，我想从中复制列A值 ( A1:A50)，我也有ABC2Excel 文件，我想从中复制列B值 ( B1:B50)。

我想将它们粘贴到
XYZ1([ ABC1 A1] toD1和 [ ABC2 B1] to D2) Excel 文件中，
XYZ2([ ABC1 A2] toD1和 [ ABC2 B2] to D2) Excel 文件中，
XYZ3...和...
XYZ50
单独的 Excel 文件。

Answer 1

看起来像这样

dim x as integer
dim wb as workbook

for x=1 to 50
    set wb=workbooks.add()
    'copy data to wb.sheets(1)
    wb.saveas filename:="C:\destination_folder\XYZ" & x & ".xlsx"
    wb.close false
next x