回到起始工作表

我logging了一个快速的macros，从我的起始工作表移动到另一个工作表，复制一些单元格，然后返回到原始工作表来粘贴复制单元格的内容。 在录制macros时，工作表有一个特定的名字，我试图理解如何改变它，以便在启动macros时返回给我的任何工作表，而不是返回到一个特定的macros。 这是代码的样子：

Sheets("vlookup template").Select Range("A1:K1").Select Selection.Copy Sheets("Sheet8").Select Range("A1").Select ActiveSheet.Paste Sheets("vlookup template").Select Range("B2:K2").Select Application.CutCopyMode = False Selection.Copy Sheets("Sheet8").Select Range("B2").Select ActiveSheet.Paste Application.CutCopyMode = False Selection.AutoFill Destination:=Range("B2:K11") Range("B2:K11").Select Selection.Copy 

我想改变它，而不是去'sheet8'它返回到原来的工作表。

Answer 1

 Dim homeSheet As WorkSheet Set homeSheet = ActiveSheet '.... Do stuff homeSheet.Activate 

请参阅避免select并激活以获取更多信息。