Vba 复制工作表并选择放置新工作表的位置

我正在使用以下代码，它几乎正是我所需要的：

ThisWorkbook.Sheets("Sheet1").Copy _
After:=ThisWorkbook.Sheets(ThisWorkbook.Sheets.Count)

问题是复制的工作表总是放在工作簿的末尾，我想把它放在特定的选项卡后面

我想答案可能非常简单，但我非常感谢你的帮助，因为我是一个新手

提前谢谢

ThisWorkbook.Sheets("Sheet1").Copy After:=ThisWorkbook.Sheets("someSheetName")