[已解决]VBA新手求助

ccq000000 · 发表于 2013-6-16 13:27

本帖最后由 ccq000000 于 2013-6-16 17:25 编辑

求助.gif

在学习VBA80第27集字典时按教程上的代码不能运行提示未注册,求解.(已经通过了工具-引用等过程创建了字典)

VBA8027集VBA字典.rar (6.7 KB, 下载次数: 6)

1032446692 · 发表于 2013-6-16 13:46

选择那个文件打开了还要选择Microsoft scripting runtime 这样才行

ccq000000 · 发表于 2013-6-16 17:08

1032446692 发表于 2013-6-16 13:46
选择那个文件打开了还要选择Microsoft scripting runtime 这样才行

Microsoft scripting runtime那个文件已经打上勾选择了(在我的.gif上传图片中能看到已选择),但就是不行.

1032446692 · 发表于 2013-6-16 18:37

这个最佳答案由 1032446692 给出，感谢 1032446692 的回答。

单击隐藏图章

运行 regsvr32 scrrun.dll

【开始】-【运行】，打开对话框里输入 regsvr32 scrrun.dll ，确定

再重新打开EXCEL

你试试

yagi · 发表于 2013-6-16 20:23

这个错误是由于引用的外部对象或文件没有显式声明，程序找不到相关的调用接口所致。
解决方法：
1、将“Option Explicit”这句删除。
OptionExplicit语句在模块级别中使用，作用是强制显式声明模块中的所有变量。
2、声明引用对象的变量：Dim x As New Scripting.Dictionary

ccq000000 · 发表于 2013-6-16 21:30

yagi 发表于 2013-6-16 20:23
这个错误是由于引用的外部对象或文件没有显式声明，程序找不到相关的调用接口所致。
解决方法：
1、将“O ...

按你的方法还是不行.全部代码如下:

Sub t1()
   Dim d As New Scripting.Dictionary
   Dim x As Integer
   For x = 2 To 4
   d.Add Cells(x, 1).Value, Cells(x, 2).Value
   Next x
   MsgBox d.Keys(1)

End Sub

ccq000000 · 发表于 2013-6-16 21:33

1032446692 发表于 2013-6-16 18:37
运行 regsvr32 scrrun.dll

【开始】-【运行】，打开对话框里输入 regsvr32 scrrun.dll ，确定

行了,谢谢您.这是我的系统原因还是什么?望告知!

yagi · 发表于 2013-6-17 06:23

ccq000000 发表于 2013-6-16 21:33
行了,谢谢您.这是我的系统原因还是什么?望告知!

这个语句的意思是重新注册一下DLL文件，可能的原因是该文件未注册或存在问题。

ccq000000 · 发表于 2013-6-17 10:54

yagi 发表于 2013-6-17 06:23
这个语句的意思是重新注册一下DLL文件，可能的原因是该文件未注册或存在问题。

谢谢你

		自动登录	找回密码
密码			注册