vbamacros用于复制工作表，然后从另一工作表复制一些信息到复制的工作表

我有问题得到这个工作。 我只想在第一张纸之前从左边复制第二张纸。 然后将刚刚成为第二张的信息复制到新的最左侧的纸张。 我在SELECTION.Copy上得到一个错误，指出有一个预期的variables缺失。

Sub GenerateInvoice() Sheets(2).Select Sheets(2).Copy Before:=Sheets(1) Sheets(2).Select Range("H2:N2").Select SELECTION.Copy Sheets(1).Select Range("E11").Select SELECTION.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False End Sub 

Answer 1

你有隐藏的工作表或非工作表（例如图表）？

您通常不需要select/激活：

 Sub GenerateInvoice() Sheets(2).Copy Before:=Sheets(1) With Sheets(2).Range("H2:N2") Sheets(1).Range("E11").Resize(1, .Columns.Count).Value = .Value End With End Sub