如何使用 vba 将工作表复制到另一个 *特定* 工作簿？
How to copy sheets to another *specific* workbook using vba?
所以我知道如何使用 vba 将 sheet 复制到另一个工作簿？这是我使用的代码：
wb.Worksheets(1).Copy Before:=activeWB.Worksheets("Sheet1")
因此，我从名为 "wb" 的工作簿中将 "wb" 中的工作 sheet 复制到名为 "activeWB" 的新工作簿中。 before 函数将此 sheet 放在 "Sheet1".
前面
但是，我想将 sheet 从 "Wb" 放置到 "Sheet1"，而不是放在它之前或之后。我尝试了很多很多方法，但无法让它发挥作用。 :(
你试过了吗？
wb.WorkSheets(1).UsedRange.Copy activeWB.WorkSheets("Sheet1").Range("A1")
不要想太多。复制sheet。删除现有的 Sheet1。将复制的 sheet 重命名为 Sheet1
wb.Worksheets(1).Copy Before:=activeWB.Worksheets(1)
Application.DisplayAlerts = False
activeWB.Worksheets("Sheet1").Delete
Application.DisplayAlerts = True
activeWB.Worksheets(1).Name = "Sheet1"
所以我知道如何使用 vba 将 sheet 复制到另一个工作簿？这是我使用的代码：
wb.Worksheets(1).Copy Before:=activeWB.Worksheets("Sheet1")
因此，我从名为 "wb" 的工作簿中将 "wb" 中的工作 sheet 复制到名为 "activeWB" 的新工作簿中。 before 函数将此 sheet 放在 "Sheet1".
前面但是，我想将 sheet 从 "Wb" 放置到 "Sheet1"，而不是放在它之前或之后。我尝试了很多很多方法，但无法让它发挥作用。 :(
你试过了吗？
wb.WorkSheets(1).UsedRange.Copy activeWB.WorkSheets("Sheet1").Range("A1")
不要想太多。复制sheet。删除现有的 Sheet1。将复制的 sheet 重命名为 Sheet1
wb.Worksheets(1).Copy Before:=activeWB.Worksheets(1)
Application.DisplayAlerts = False
activeWB.Worksheets("Sheet1").Delete
Application.DisplayAlerts = True
activeWB.Worksheets(1).Name = "Sheet1"