我有两个单独的工作簿,一个名为 ActiveWorkbook,另一个名为 Terminated Workbook。我想要做的是在 ActiveWorkbook--Templatesheet 上创建一个复制按钮,它将询问用户将哪个工作表复制并复制到 TerminatedWokbook 并命名为与原始工作表相同。
我有一些这样的代码,因为我对 excel 宏很陌生,所以它不起作用。谢谢
Sub CopytoTernimal()
Dim CopyName As String
CopyName = InputBox("Please enter the name of sheet which will copy to ternimal")
Sheets("CopyName").Copy
Before:=Workbooks("Terminated Employees").Sheets(1)
End Sub