作者：乔山办公网日期：
返回目录：excel表格制作
补充问题的代码
1，如果是Excel启动就出现此类错误，建议先卸载 MS Office，重启电脑，然后再重新安装；
2，如果是在操作过程中出现此类错误，原因非常多，建议参考 微软官方解决方案。
http://support.microsoft.com/kb/828550/zh-cn
VB程序运行时显示的错误数字解释
3 ---- 无 GoSub 返回
5 ---- 无效的过程调用或参数
6 ---- 溢出
7 ---- 内存溢出
9 ---- 下标越界
10 ---- 该数组被固定或暂时锁定
11 ---- 除数为零
13 ---- 类型不匹配
14 ---- 字符串空间溢出
16 ---- 表达式太复杂
17 ---- 不能执行所需的操作
18 ---- 出现用户中断
20 ---- 无错误恢复
28 ---- 堆栈空间溢出
35 ---- 子程序或函数未定义
47 ---- DLL 应用程序客户太多
48 ---- 加载 DLL 错误
49 ---- DLL 调用约定错误
51 ---- 内部错误
52 ---- 错误的文件名或号码
53 ---- 文件未找到
54 ---- 文件模式错误
55 ---- 文件已打开
57 ---- 设备 I/O 错误
58 ---- 文件已存在
59 ---- 记录长度错误
61 ---- 磁盘已满
62 ---- 输入超出文件尾
63 ---- 记录号错误
67 ---- 文件太多
68 ---- 设备不可用
70 ---- 拒绝的权限
71 ---- 磁盘未准备好
74 ---- 不能以不同的驱动器改名
75 ---- 路径/文件访问错误
76 ---- 路径未找到
91 ---- 对象变量或 With 块变量未设置
92 ---- For 循环未初始化
93 ---- 无效的模式串
94 ---- 无效使用 Null
96 ---- 由于对象已经激活了事件接受器支持的最多个事件，因此不能激活对象的事件
97 ---- 不能调用对象的友元函数，该对象不是所定义类的一个实例。
98 ---- 一个属性e68a84e8a2ad7a686964616f363或方法调用不能包含对一个私有对象的引用，无论是作为参数还是返回值
321 ---- 无效文件格式
322 ---- 不能创建必要的临时文件
325 ---- 资源文件中格式无效
380 ---- 无效属性值
381 ---- 无效的属性数组索引
382 ---- 运行时不支持 Set
383 ---- (只读属性)不支持 Set
385 ---- 需要属性数组索引
387 ---- Set 不允许
393 ---- 运行时不支持 Get
394 ---- (只写属性)不支持 Get
422 ---- 属性没有找到
423 ---- 属性或方法未找到
424 ---- 要求对象
429 ---- ActiveX 部件不能创建对象
430 ---- 类不支持自动化或不支持期望的接口
432 ---- 自动化操作时文件名或类名未找到
438 ---- 对象不支持该属性或方法
440 ---- 自动化错误
442 ---- 远程进程到类型库或对象库的连接丢失。 按下对话框的“确定”按钮取消引用。
443 ---- 自动化对象无缺省值
445 ---- 对象不支持该动作
446 ---- 对象不支持命名参数
447 ---- 对象不支持当前的本地设置
448 ---- 未找到命名参数
449 ---- 必选参数
450 ---- 错误的参数号或无效的属性赋值
451 ---- Property let 过程未定义，property get 过程不返回对象。
452 ---- 无效的序号
453 ---- 指定的 DLL 函数未找到
454 ---- 代码资源未找到
455 ---- 代码资源锁定错误
457 ---- 该关键字已经与该集合的一个元素相关联
458 ---- 变量使用了一个 Visual Basic 不支持的自动化类型
459 ---- 对象或类不支持事件集
460 ---- 无效的剪贴板格式
461 ---- 未找到方法或数据成员
462 ---- 远程服务器不存在或不能使用
463 ---- 未在本地机器上注册类
481 ---- 无效的图片
482 ---- 打印机错误
744 ---- 要搜索的文本没有找到
746 ---- 替换文本太长
要看你excel版本，百要装补丁包。我曾经度被这问题折腾了很久才解决。问
office2007的话装sp3补丁包，2010装sp2，2013有个答专用的包，2016不会有这个问题。后专来我让所属有用户都升级到2016了。
excel2013最容易出这个问题。要装微软对应的补丁。你发你的excel版本，我告诉你补丁下载地址。