VBA Range_Copy宏-如何将相同任务应用于后续行

Question

我有一个工作清单的电子表格。一个字段可以包含14个描述中的1个。我认为创建宏比每次手动转到单独的工作表并复制并粘贴所需的描述要快。

对此我完全陌生，但是能够在一个工作表中的单元格A1中创建一个宏来抓取数据并将该数据添加到另一工作表中的单元格S3中-请参见下面的代码。 （每个描述都有其自己的工作表，在单元格A1中有数据）。我的问题是，如何移动到下一行和单元格S4。预先感谢！

Sub Range_Copy()

Worksheets("Used Single Items Returns").Range("A1").Copy Worksheets("Gopher Items CSV Test").Range("S3")

End Sub

Answer 1

如果您只想复制到所选行的Col S中：

int main(int argc, char ** argv) {
    std::shared_ptr<A> a = std::make_shared<A>();
    a->printA();
    return 0;
}