将工作表复制到另一个工作簿，但工作表也保存在新工作簿中

问题描述：

我需要将工作表从一个工作簿复制到另一个（现有）工作簿。它可以工作，但工作表也会自动保存在新的工作簿中。我不知道这是为什么。这是我的代码：将工作表复制到另一个工作簿，但工作表也保存在新工作簿中

Worksheets("New").Activate 
If IsSheetEmpty(StartWorkbook.Sheets("New")) = True Then 
    Application.DisplayAlerts = False 
    Worksheets("New").Delete 
    OLDWorkbook.Activate 
    Sheets("sheet1").Select 
    Sheets("sheet1").Copy 
    Sheets("sheet1").Copy After:=StartWorkbook.Sheets("Control") 
    StartWorkbook.Activate 
    Sheets("sheet1").Name = "New" 
    OLD.Close 
    Application.DisplayAlerts = True 
Else 
    MsgBox ("sheet is not empty") 
End If

在此先感谢

删除'表（” 。工作表Sheet1" ）Copy'线（保持第二个与DEST部分）...... –

哈哈没关系，这是这么简单......非常感谢你，这是真的很烦：O） – VeVi

欢迎您:) –

答

正好有个正确的答案：

此行为是由于这样的事实，复制没有目的地的片材，新的工作簿会创建了这张表。由于这个原因，没有命令来“粘贴”复制的纸张。

对于给定的代码，只需删除行

Sheets("sheet1").Copy

但保留行：

Sheets("sheet1").Copy After:=StartWorkbook.Sheets("Control")

（很明显，需要）;）

将工作表复制到另一个工作簿，但工作表也保存在新工作簿中

相关推荐