如何将工作表从外部复制到当前工作簿并将该工作表另存为新工作簿

Question

我正在开发一个excel自动化系统。我有一个主要工作簿，有两张表，即仪表板和数据1。我需要从另一个工作簿中获取一个工作表（其名称可以是任何不固定的文件。将它视为filex.xls）放在D：驱动器中并将整个工作表粘贴到data1工作表。我需要在该工作表上执行一些操作，然后将data1工作表保存为C：驱动器中的新工作簿，其名称与原始文件相同，后跟修改后的文件（即filexmodified.xls）

Answer 1

导入数据：

Workbooks.Open PATH Worksheets(1).UsedRange.copy data1.cells(1) 'data1 should be a Worksheet Variable ActiveWorkbook.Close False

保存为新工作簿：

ThisWorkbook.SaveAs PATH