复制工作表并select放置新工作表的位置

我正在使用下面的代码，几乎完全是我需要它做的：

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

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

我认为答案可能极其简单，但我真的很感谢你的帮助，因为我是一个新手。

提前致谢

Answer 1

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