vba - 在 VBA 中保留 ActiveSheet

Question

在我的代码中，我从一张纸上复制两行单元格并将其粘贴到另一张纸上（以及其他正常工作的东西，因此无需在这里全部引用）。我的问题是我希望宏对我选择在其中运行宏的每个工作表执行此操作，而不仅仅是最初用于记录宏的工作表。

Sheets("Gr 3 Lang").Select
ActiveCell.Rows("1:2").EntireRow.Select
Selection.Copy
Sheets("Gr 3 Math").Select
ActiveSheet.Paste

本质上，如果我打算在“Gr 4 Math”等中运行宏，我不希望它说“Gr 3 Math”。

我尝试改用 ActiveSheet，但那时“Gr 3 Lang”是 ActiveSheet。

不知道该怎么办。

特伦顿

Answer 1

这个应该做...

Sheets("Gr 3 Lang").Rows("1:2").Copy ActiveSheet.Range("A1") 

Answer 2

Sheets(1).Rows("1:2").EntireRow.Copy
ActiveSheet.Paste

将 1 替换为您想要的任何内容。您可以按名称或索引使用 Sheets("Gr 3 Math")。