Question

作为关于我的VBA / Rhinoscript的前一篇文章的后续内容，我遇到了一个非常奇怪的灾难性事件＆＃34;从我最初在Excel 2007中创建的Excel电子表格执行以下VBA代码时出现错误，我现在尝试在Excel 2016中运行：

Set Rhino = CreateObject("Rhino4.Interface")
If (Err.Number <> 0) Then
    'MsgBox ("Failed to create Rhino4 object")
    Set Rhino = CreateObject("Rhino4.Application")
    If (Err.Number <> 0) Then
        MsgBox "Failed to create Rhino4 object: " & Err.Number
        Exit Sub
    End If
End If

CreateObject失败，Run-time error 8000fff Automation error, Catastrophic failure.检查周围，人们已经模糊地提到有关在Excel版本之间进行迁移是一个问题，并在工具 - ＆gt;参考文献下查看，但是我是不确定我应该寻找什么。有谁知道吗？

谢谢，

马特

Answer 1

我可以使用Excel 2010和Rhino 4.0 SR9在这里使用您的代码。

如果您没有运行Rhino 4.0 SR9，那么我建议您下载并安装此服务版本：

http://www.rhino3d.com/download/rhino/4.0/sr

我的猜测是Rhino的COM组件没有注册属性（在Windows注册表中）。安装最新的服务版本应解决此问题。

如果这有帮助，现在就让我。

- 戴尔

VBA CreateObject上的运行时错误8000fff

1 个答案: