主动x参考的VBA麻烦

我想为打印机编程一个控件。 打印机的界面是“Weber Packaging Solutions”的“Legitronic”软件。 在vba-activex手册中写道,一个实例的构build过程如下:

对于后期绑定:

Dim MyLabel as Object Set MyLabel = CreateObject("Legi32.label") 

早期绑定:

 Dim MyLabel as Legi32.label Set MyLabel = CreateObject("Legi32.label") 

我提到了界面的types库(我的同事告诉我这是正确的参考,因为他在过去也做了一个程序,并且对他有效)

但每次我执行程序时,我都会得到运行时错误“429”:ActiveX组件不能创build对象。

我使用Microsoft Excel工作表的macros(.xlsm)

你知道这个问题还是知道,怎么解决?

提前致谢!

我同意floladieter早期的约束力。

早期绑定。 尝试设置一个你正在尝试使用的组件的引用(Legi32)。 如果您不能指定对象的引用,则可能必须使用RegSvr32 ./somefile将其注册到系统中。 你的同事可能已经在他的电脑上注册了,但是你没有。 一旦你可以设置一个引用,你应该能够编译你的代码,并成功地使用新的 – 除非组件有其他问题。

晚绑定。 这是你使用CreateObject(“SomeName”)的地方。 当你创build一个组件时,你可以为它分配一个存储在registry中的Id。 由于不同的版本,此ID可能会更改。 它可能你有一个不同的版本安装,正在寻找错误的名字。 我build议你做的是打开registry并search“Legi32”,看看Id是否有1或名称末尾的任何内容。