如何在工作簿中创build和命名引用单元格的Excel工作表

我试图通过复制粘贴新的分析数据到一个新创build的工作表命名与date，我正在存储在数据插入工作表中的单元格B2中一个相当大的macros。 所以最简单的说，我想创build一个新的工作表，并将其命名为位于不同工作表中的单元格B2中的内容（date）。

ActiveSheet.Range("A3:Q" & lastRow).Select Selection.Copy ActiveWorkbook.Sheets.Add After:=Worksheets(Worksheets.Count) Sheets(ActiveSheet.Name).Name = ActiveWorkbook.Sheets(Trade_Data_Insert).Range("B2") 

Answer 1

改变你的macros

 Dim newSht As Worksheet ActiveSheet.Range("A3:Q" & lastRow).Select Selection.Copy Set newSht = ActiveWorkbook.Sheets.Add(, Worksheets(Worksheets.Count)) newSht.Name = ActiveWorkbook.Sheets(Trade_Data_Insert).Range("B2").Value 

也… Trade_Data_Insert一个variables？ 如果它的名字你需要把它放在“”