Question

在VBA编辑器中，我使用以下代码创建了一个新的工作表集合：

Set Page1s = New Collection
Page1s.Add Workbook010.Sheets("1stPage")

目前，我只想用以下代码复制一个工作表

Workbook010.Page1s(1).Copy After:=Sheets("1stPage")

上面的代码行生成运行时错误9，下标超出范围... 我不明白为什么我不能达到我刚刚创建的收藏集的第一项？非常感谢您的反馈。弗朗兹

Answer 1

您过度指定正在复制的对象。这样就可以了：

prog.cc: In function 'int main()':
prog.cc:29:25: error: use of deleted function 'Woop::Woop(const std::vector<int>&&)'
   29 |     Woop woop(someNums());
      |                         ^
prog.cc:15:5: note: declared here
   15 |     Woop(std::vector<int> const &&) = delete;
      |     ^~~~

我在Excel VBA中创建集合时遇到问题

1 个答案: