用于在命名工作表之后放置多个工作表的vba代码

Question

我有一个vba代码，可以多次复制模板工作表，创建许多依赖于所需选项卡名称的动态列表的工作表。选项卡是在工作簿中最后一个当前选项卡之后创建的，但是我希望它们在模板工作表之后插入。是否有一个简单的vba代码来执行此操作？

由于

安娜

Answer 1

考虑：

Sub dural()
    Dim nTimes As Long
    nTimes = 3
    For i = 1 To nTimes
        Sheets("Template").Copy After:=Sheets("Template")
    Next i
End Sub