哈哈！完美解决“无法装载这个对象，~”

fang5852 · 发表于 2012-12-20 20:37

这个问题困扰了我很久，终于下决心，从一大堆网络资料中总结一个比较完整的解决方案：
问题表述：一般用listview,treeview,flexgrid等控件制作的工具，在不同电脑上使用时会遇到一个很大的问题就是“无法装载这个对像，因为他不适用于这台计算机”

原因分析：是C:\WINDOWS\system32下文件MSCOMCTL.OCX 版本不同造成的。这里提供比较新的版本供下载

MSCOMCTL.part3.rar (411 Bytes, 下载次数: 4091)

MSCOMCTL.part2.rar (200 KB, 下载次数: 4844)

MSCOMCTL.part1.rar (200 KB, 下载次数: 4772)
下载解压后，
第一步：将MSCOMCTL.OCX 复制到C:\WINDOWS\system32，覆盖原有文件。（提醒：覆盖前将原有的MSCOMCTL.OCX 文件备份一下，以免~~）
第二步：新建空白工作簿，打开VB编辑器（ALT+F11）复制以下代码，运行。
Sub 删除EXD的文件文件()
Dim str$
str = Application.TemplatesPath
str = Replace(Application.TemplatesPath, "Templates", "Forms")
MsgBox "模板保存的默认路径是: " & str
''查找后缀为EXD的文件,并删除之。
On Error Resume Next
Dim xlsFile As String
xlsFile = Dir(str & "\*.EXD")
Do
If InStr(1, xlsFile, "*") = 0 Then
Kill str & xlsFile '删除文件
End If
xlsFile = Dir
Loop Until Len(xlsFile) = 0
Shell "explorer.exe " & str, 1 '打开文件夹
End Sub
第三步： windows xp：电脑桌面开始 - 运行输入 Regsvr32 MSCOMCTL.OCX,然后确定后会提示已注册
Win7：开始 - 所有程序 - 附件 - 命令文本，输入Regsvr32 MSCOMCTL.OCX,然后回车后会提示已注册
第四步：就能正常运行了！亲测有效！
但如果你的这个控件根本在office就没有，那建议装一个VB6.0，这样各种常用控件都会有了。
以上是从网络各贴子中总结而来~~！谢谢原创网友~

清风_ll · 发表于 2012-12-20 21:01

感谢分享{:soso_e128:}

longwin · 发表于 2012-12-20 21:13

{:soso_e179:}订一下，估计有好多同学有这样的困惑，确实是完美解决。

沉潜 · 发表于 2012-12-20 21:26

做个记号，以便今后使用

longming3 · 发表于 2012-12-20 21:42

http://club.excelhome.net/forum. ... p;page=1#pid6226827

fang5852 · 发表于 2012-12-20 22:26

longming3 发表于 2012-12-20 21:42
http://club.excelhome.net/forum.php?mod=viewthread&tid=906629&page=1#pid6226827

这个好！加上这个就更完善！

fu123 · 发表于 2012-12-21 09:15

做个记号，以便今后使用

jiulongpo · 发表于 2012-12-21 09:45

先顶后藏，感谢分享{:soso_e179:}

Stu_Excel · 发表于 2013-1-13 11:58

终于找到了，感谢分享！

objector2008 · 发表于 2013-2-19 16:03

感谢分享，留个记号！

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

[分享] 哈哈！完美解决“无法装载这个对象，~”

评分