循环到ActiveWorkbook.Worksheets时对象定义的错误

Question

你好我有一个简单的代码：

Dim Sheet As Variant

For Each Sheet In ActiveWorkbook.Worksheets
    Debug.print Sheet.Name
Next Sheet

但是当我运行它时，我在第二张纸上得到了错误

  

运行时错误＆＃39; 32809＆＃39;

     

应用程序定义或对象定义的错误

它来自哪里？

编辑： 这里是项目中使用的lib