Excel VBA:将其他工作簿中的内容粘贴到活动工作簿表2中

Excel VBA:将其他工作簿中的内容粘贴到活动工作簿表2中,vba,excel,Vba,Excel,正如标题所示,下面是我在活动工作簿中打开另一个工作簿、复制其内容,然后将其粘贴到当前工作簿的第二页中的尝试。但是我无法通过粘贴操作。我一直无法在网上找到与这个特殊案例相关的例子 Sub SL() Dim x As Workbook Set x = Workbooks.Open("C:\Stuff.xlsx") x.Sheets("SheetName").Cells.Copy ActiveWorkbook.Sheets("Sheet2").Cells.PasteSpecial End Su

正如标题所示,下面是我在活动工作簿中打开另一个工作簿、复制其内容,然后将其粘贴到当前工作簿的第二页中的尝试。但是我无法通过粘贴操作。我一直无法在网上找到与这个特殊案例相关的例子

Sub SL()
Dim x As Workbook

Set x = Workbooks.Open("C:\Stuff.xlsx")

x.Sheets("SheetName").Cells.Copy

ActiveWorkbook.Sheets("Sheet2").Cells.PasteSpecial

End Sub

有人能解释一下我应该在那里放些什么吗?

我相信以下内容将帮助你实现你的期望:

Sub SL()
Dim x As Workbook

Set x = Workbooks.Open("C:\Stuff.xlsx")

x.Sheets("SheetName").Cells.Copy
'does your workbook actually have a Sheet named "SheetName"?
'if not, you need to reference the sheet that you want to copy

ThisWorkbook.Sheets("Sheet2").Cells.PasteSpecial

x.Close False
'close your "Stuff" workbook without saving
End Sub

工作簿Stuff.xlsx是否有一个名为SheetName的选项卡/工作表?此工作簿!完美的谢谢@Xabier。是的,为了简单起见,我刚刚将它们重命名为SheetName,Stuff等等。