如果工作簿包含6个选项卡，则运行当前Sub，如果工作簿包含9个选项卡，则运行不同的Sub

Question

我有一个工作簿，其中包含宏，它循环遍历800多个工作簿的目录，同时获取特定单元格并将它们复制到此工作簿。它已经工作了2年，直到800多个工作簿中的50个从6个选项卡更改为9个选项卡。

我有class Product(models.Model): uuid = models.UUIDField(primary_key=True, default=uuid.uuid4) 抛出调试错误，因为新工作簿有9个标签。

如果工作簿有6个或9个标签并且需要帮助，我有2个单独的代码需要运行来拉取这些单元格。

这是我工作的完整Sub，任何关于如何做到这一点的建议都将是一个重要的帮助。

For X = 6 To Wb2.Sheets.Count

Answer 1

我同意评论者的观点，“X”循环没有意义。但要根据纸张数量设置不同的行：

If Wb2.Sheets.Count = 6 then
  'code for 6-sheet workbook
Elseif Wb2.Sheets.Count = 9 then
  'code for 9-sheet workbook
End if