从活动的wooksheet导出数据

我制作了一个带有单个工作表的Excel工作簿，作为最终用户的模板。 工作簿将保存并退出，并根据3个单元格值创build文件名。 我可以使这个工作簿模板自动导出某些数据到另一个工作簿吗？ 另一件事情是，新导出的数据是否可以自动将新行插入到工作簿/工作表目标中？ 我已经检查了相关的Excel论坛，发现代码必须有一个文件名来导出数据，我坚持下去。 这里我已经试过的代码：

---

Sub ExportData()

 Sheets("Master").Range("C95").Copy Destination:=Sheets("Summary").Range("B9") Sheets("Master").Range("E97").Copy Destination:=Sheets("Summary").Range("C9") Sheets("Master").Range("T9").Copy Destination:=Sheets("Summary").Range("D9") Sheets("Master").Range("T11").Copy Destination:=Sheets("Summary").Range("E9") Sheets("Master").Range("E15").Copy Destination:=Sheets("Summary").Range("F9") x.Close End Sub 

———–（我试过的其他代码）—————————— –

 Sub ExportData() Dim x As Workbook Dim s As Workbook Set x = Workbooks.Open("Template") Set s = Workbooks.Open("Summary Report") s.Sheets("Summary").Range("C95").Value = x.Sheets("Master").Range("B9") s.Sheets("Summary").Range("E97").Value = x.Sheets("Master").Range("C9") s.Sheets("Summary").Range("T9").Value = x.Sheets("Master").Range("D9") s.Sheets("Summary").Range("T11").Value = x.Sheets("Master").Range("E9") s.Sheets("Summary").Range("E15").Value = x.Sheets("Master").Range("F9") x.Close End Sub 

---

感谢帮助。 谢谢。