对象库无效或包含对不能找到的对象定义的引用

杨成云

　　最近，我将Office2007升级到Office2010后，也出现类似情况，在网上查了一下资料，我快速的飞到了这里，看了一下，问题得以解决。

　　回答：删除C:\Documents and Settings\USER\Application Data\Microsoft\Forms\下的所有后缀名为EXD的文件即可。
USER替换为当前用户名

　　我使用的是Vista系统
　　目录文件夹为C:\Users\Administrator\AppData\Roaming\Microsoft\Forms\

zm0115

16楼的哥们太牛了，王道阿，呵呵，我还准备把好不容易装好的2010卸载呢。多谢。顺便问一下有谁知道。原来可以用的控件，装了2010后提示“方法或数据成员未找到”是什么原因吗？

我有一个在工作表中使用的listview 。（窗体中使用的通通OK）出现这样的提示，原来可以正常显示的，现在变成一个大红叉。

那位知道，这是何解？因为这个Excel启动既需要连接公司SQL服务器，就不上传了，上张截屏的图给大家看看。分别是代码出错的地方，和工作表上listview控件变成个大红叉叉/。


[ 本帖最后由 zm0115 于 2010-6-14 00:32 编辑 ]

jmzhao

太感谢了，我的难题也解决了。牛人

lingeal

我是在删除EXD文件之后也不见效（包括重启）的情况下，

采用 把 提示该问题时所在的工作表 的 控件 删除，

就可以了。

希望对大家有所帮助

xiongxiaohui

请问WIN7系统遇到上面的问题怎么办？

hhzjxss

奇怪，我自己做的工具，原来好好的！

前两天试安装了2010，却没激活，后来不出现了这个问题！

卸载2010后。修复2003，还是有这个问题！

刚测试楼主的附件，也是如此！

hhzjxss

测试解决了，可用代码删除之：

1. Sub 删除EXD的文件文件()
   
2. Dim str$
   
3. str = Application.TemplatesPath
   
4. str = Replace(Application.TemplatesPath, "Templates", "Forms")
   
5. MsgBox "模板保存的默认路径是: " & str
   
6. ''查找后缀为EXD的文件,并删除之。
   
7. On Error Resume Next
   
8. Dim xlsFile As String
   
9. xlsFile = Dir(str & "\*.EXD")
   
10. Do
    
11. If InStr(1, xlsFile, "*") = 0 Then
    
12. Kill str & xlsFile '删除文件
    
13. End If
    
14. xlsFile = Dir
    
15. Loop Until Len(xlsFile) = 0
    
16. Shell "explorer.exe " & str, 1 '打开文件夹
    
17. End Sub

复制代码

hncyllz

学习啦！——俺也遇到这样的问题，按照16楼的办法，果然解决！

wanghaiqn1957

原帖由 realking 于 2010-4-25 12:09 发表
这才是完美的解决方案
删除C:\Documents and Settings\USER\Application Data\Microsoft\Forms\下的所有后缀名为EXD的文件即可。
USER替换为当前用户名

我是直接删除后缀名为exd的文件，重启后问题解决。真神了！

吴民光

hhzjxss 发表于 2011-3-10 23:13
测试解决了，可用代码删除之：

我的WIN7+2003,就是用你这个解决了，强，这个错误让我郁闷很久了。