Excel 2010 宏创建新工作表并重命名

Question

因此，我希望将“新建”工作表用作模板。我经常创建新工作表，如果能稍微自动化一点就好了。到目前为止，我已经创建了一个宏来取消隐藏模板工作表、创建副本、隐藏原始工作表并重命名新工作表。我遇到的问题是，当我录制宏时，我从主工作表中复制了单元格 A2 并将其粘贴到新工作表名称中。它没有拾取粘贴，而只是拾取粘贴的名称。有没有办法将单元格 A2 的内容粘贴到新工作表名称中？

我迄今为止拥有的宏代码。

Sub CreateNewSheet()
'
' CreateNewSheet Macro
'

'
Sheets("New").Visible = True
Sheets("New").Select
Sheets("New").Copy Before:=Sheets(1)
Sheets("New").Select
ActiveWindow.SelectedSheets.Visible = False
Sheets("Home").Select
Range("A2").Select
Selection.Copy
Sheets("New (2)").Select
Sheets("New (2)").Name = "Raptor"
End Sub

任何帮助都将不胜感激。如果我碰巧解决了这个问题，我会发布答案。

Answer 1

Sub CreateNewSheet()
'
' CreateNewSheet Macro
'

'
Sheets("New").Visible = True
Sheets("New").Select
Sheets("New").Copy Before:=Sheets(1)
Sheets("New").Select
ActiveWindow.SelectedSheets.Visible = False
Sheets("New (2)").Select
Sheets("New (2)").Name = Sheets("Home").Range("A2").Value
End Sub