VBA – 将第一张从closures的工作簿导入到活动工作簿中的已命名工作表

我是VBA的新手,我正在寻找一段代码,允许我select一个Excel文件,并将该文件的第一个工作表导入到活动工作簿中的已命名工作表(已存在)运行macros)。

谢谢

试试这个:

Sub KopyKat() Dim sd As Worksheet, rd As Range Set sd = ThisWorkbook.Sheets("Final Destination") Set rd = sd.Range("A1") filespec = Application.GetOpenFilename() Set wb = Workbooks.Open(Filename:=filespec) Sheets("Sheet1").Activate Cells.Copy rd wb.Close End Sub