Excel VBA将工作表复制到其他工作簿

我知道这个问题已经讨论过很多次了，我已经检查了几乎所有的源代码，但我不知道为什么这个简单的代码不起作用。我想将工作表从一个工作簿复制到另一个工作簿

Sub SimpleCode()

Dim wb1 As Workbook
Dim wb2 As Workbook

Set wb1 = Workbooks("C:\Users\File1.xlsx")
Set wb2 = Workbooks("C:\Users\File2.xlsx")

wb1.Sheets("File1Sheet1").Copy After:=wb2.Sheets("File2Sheet1")

End Sub

---

假设两个文件都已打开，则只需调用工作簿的名称，而不需要调用全名：

Sub SimpleCode()

Dim wb1 As Workbook
Dim wb2 As Workbook

Set wb1 = Workbooks("File1.xlsx")
Set wb2 = Workbooks("File2.xlsx")

wb1.Sheets("File1Sheet1").Copy After:=wb2.Sheets("File2Sheet1")

End Sub

---

你试过打开作业本吗？（

Workbooks.Open Filename:=“C:\Users\File1.xlsx”

它做什么而不工作？如果工作簿是打开的，那么您只使用文件名（而不是完整路径）引用它们。如果它们没有打开，那么您需要以@controlnetic.nomad notes的形式打开它们。@StackUser如果这回答了您的问题，请点击帖子左上角的复选标记