如何将第一行select中的所有值复制到vba的新表单中？

我想将所有值14-22（select的第一行值）复制到vba / Excel中的新工作表。 我怎样才能做到这一点？

Sheets.Add(After:=Sheets(Sheets.Count)).Name = "vacation-results" Set vacationSheet = Sheets("vacation-results") 

Answer 1

如果确实需要使用select，请尝试以下操作：

 ' Copy the first row of values (not the header) Selection.Rows.Item(2).Copy ' Paste our clipboard content into the newly formed sheet vacationSheet.Range("A1").PasteSpecial