excel - 我如何控制将一张工作表复制到另一个工作簿的位置

Question

我有代码将原始工作簿的一个工作表复制到终止的工作簿，它工作正常。但我需要控制粘贴位置以终止工作簿。现在它粘贴在活动工作表之前。我希望它在我的摘要表之后进入第二张表。我对宏很陌生，谢谢。

Sub CopytoTernimal()
Dim CopyName As String

On Error GoTo ErrMess

CopyName = InputBox("Please enter the name of sheet which will copy to ternimal")

Dim thisSheet As Worksheet

Set thisSheet = Workbooks("original.xlsm").Worksheets(CopyName)

thisSheet.Rows.Copy

Dim NewSheet As Worksheet
Set NewSheet = Workbooks("Terminated Employees.xlsm").Worksheets.Add()
NewSheet.Name = thisSheet.Name
NewSheet.Paste

thisSheet.Delete

ErrExit：退出子

ErrMess: MsgBox "xxxxxx." GoTo ErrExit

End Sub

Answer 1

我相信它会像

thisSheet.Copy After:=Workbooks("Terminated Employees.xlsm").Worksheets("name of the first summary worksheet")