首页 > 解决方案 > 从每 8 页复制数据而不“手动”引用它们

问题描述

我有一个包含 80 个工作表的工作簿。

我想将 Sheet1 中的两列复制到接下来的 7 张(Sheet2、3、4、5、6、7、8),然后从 Sheet9 复制到接下来的 7 张(Sheet10、11、12、13、14、15、 16) 然后从第 17 页到接下来的 7 页,依此类推...

我不知道如何循环这个,任何帮助将不胜感激!

标签: excelvba

解决方案


您可以将嵌套循环与要跳转的步骤(张数)一起使用。

For i = 1 To 80 Step 8
    For j = i + 1 To i + 7
        'Write your logic to copy data from sheet (i) into sheets (j)
    Next
Next

推荐阅读