Excel 如何控制将一张工作表复制到另一个工作簿的位置
我有代码将原始工作簿的一个工作表复制到终止的工作簿中,工作正常。但我需要控制粘贴位置以终止工作簿。现在它粘贴在活动工作表之前。我想把它放在总结表之后的第二页。我对宏很陌生,谢谢Excel 如何控制将一张工作表复制到另一个工作簿的位置,excel,vba,Excel,Vba,我有代码将原始工作簿的一个工作表复制到终止的工作簿中,工作正常。但我需要控制粘贴位置以终止工作簿。现在它粘贴在活动工作表之前。我想把它放在总结表之后的第二页。我对宏很陌生,谢谢 Sub CopytoTernimal() Dim CopyName As String On Error GoTo ErrMess CopyName = InputBox("Please enter the name of sheet which will copy to ternimal") Dim thisSh
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
错误退出:
出口接头
ErrMess:MsgBox“xxxxxx”
转到出口
End Sub
我相信会是这样的
thisSheet.Copy After:=Workbooks("Terminated Employees.xlsm").Worksheets("name of the first summary worksheet")