Question

我正在使用CATIA脚本（宏）学习VBA。我的代码看起来像这样

Sub CATMain()
  Dim oPart1 As Document
  Set oPart1 = CATIA.ActiveDocument
  Dim currentWindow As Windows 'I am getting an error here 
  Set currentWindow = CATIA.Windows
  Dim openWind As Integer
  openWind = currentWindow.Count
End Sub

我在其他集合中也遇到这种错误，当我创建一个新的项目库时，其中一些会起作用，但这个错误不会消失

我试图在许多论坛上找到答案，即使在这里我们也有一些类似的话题，但是我没有得到我问题的答案

Answer 1

@@您的建议解决了我的问题，将其发布在此处只是为了解决此问题的答案。谢谢！

Dim currentWindow As Object
Set currentWindow = CATIA.Windows

Answer 2

也许您的引用中还有另一个“ Windows”对象类型，这使定义不明确。

尝试一下：

     Dim wx as INFITF.Windows

我个人通常不会为集合属性定义变量。例如，只要需要引用Windows集合，就只使用“ CATIA.Windows”。

此外，如果您安装了CATIA的多个版本，或者最近卸载了一个版本，则可能注册了错误版本的库。这将导致您所看到的错误。

因此，如果您有多个版本（或最近已卸载），请从要使用的版本的exe文件夹中运行“ CNext.exe -regserver”。

我收到了编译时错误，Windows模块的类型无效（VBA，宏）。（CATIA V5）

2 个答案: