vba错误编号所对应的错误信息（备查）

vba错误编号所对应的错误信息（备查）

可捕获的错误

可捕获的错误通常发生在应用程序运行时，但也有一些会发生在开发期间或编译时间。可使用 On Error 语句与 Err 对象来探测并回应可捕获的错误。1 – 1000 之间未使用的错误号都是保留给 Visual Basic 以后使用的。

3没有返回的GoSub

5无效的过程调用

6溢出

7内存不足

9数组索引超出范围

10此数组为固定的或暂时锁定

11除以零

13类型不符合

14字符串空间不足

16表达式太复杂

17不能完成所要求的操作

18发生用户中断

20没有恢复的错误

28堆栈空间不足

35没有定义 子程序、函数，或属性

47DLL 应用程序的客户端过多

48装入 DLL 时发生错误

49DLL 调用规格错误

51内部错误

52错误的文件名或数目

53文件找不到

54错误的文件方式

55文件已打开

57 I/O 设备错误

58文件已经存在

59记录的长度错误

61磁盘已满

62输入已超过文件结尾

63记录的个数错误

67文件过多

68设备不可用

70没有访问权限

71磁盘尚未就绪

74不能用其他磁盘机重命名

75路径/文件访问错误

76找不到路径

91尚未设置对象变量或 With 区块变量

92For循环没有被初始化

93无效的模式字符串

94Null 的使用无效

97不能在对象上调用 Friend 过程，该对象不是定义类的实例

298系统 DLL 不能被加载

320在指定的文件中不能使用字符设备名

321无效的文件格式

322不能建立必要的临时文件

325源文件中有无效的格式

327未找到命名的数据值

328非法参数，不能写入数组

335不能访问系统注册表

336ActiveX 部件不能正确注册

337未找到 ActiveX 部件

338ActiveX 部件不能正确运行

360对象已经加载

361不能加载或卸载该对象

363未找到指定的 ActiveX 控件

364对象未卸载

365在该上下文中不能卸载

368指定文件过时。该程序要求较新版本

371指定的对象不能用作供显示的所有者窗体

380属性值无效

381无效的属性数组索引

382属性设置不能在运行时完成

383属性设置不能用于只读属性

385需要属性数组索引

387属性设置不允许

393属性的取得不能在运行时完成

394属性的取得不能用于只写属性

400窗体已经显示，不能显示为模式窗体

402代码必须先关闭顶端模式窗体

419允许使用否定的对象

422找不到属性

423找不到属性或方法

424需要对象

425无效的对象使用

429ActiveX 部件不能建立对象或返回对此对象的引用

430类不支持自动操作

432在自动操作期间找不到文件或类名

438对象不支持此属性或方法

440自动操作错误

442连接至型态程序库或对象程序库的远程处理已经丢失

443自动操作对象没有默认值

445对象不支持此动作

446对象不支持指定参数

447对象不支持当前的位置设置

448找不到指定参数

449参数无选择性或无效的属性设置

450参数的个数错误或无效的属性设置

451对象不是集合对象

452序数无效

453找不到指定的 DLL 函数

454找不到源代码

455代码源锁定错误

457此键已经与集合对象中的某元素相关

458变量使用的型态是 Visual Basic 不支持的

459此部件不支持事件

460剪贴板格式无效

461未找到方法或数据成员

462远程服务器机器不存在或不可用

463类未在本地机器上注册

480不能创建 AutoRedraw 图象

481图片无效

482打印机错误

483打印驱动不支持指定的属性

484从系统得到打印机信息时出错。 确保正确设置了打印机

485无效的图片类型

486不能用这种类型的打印机打印窗体图象

520不能清空剪贴板

521不能打开剪贴板

735不能将文件保存至 TEMP 目录

744找不到要搜寻的文本

746取代数据过长

31001内存溢出

31004无对象

31018未设置类

31027不能激活对象

31032不能创建内嵌对象

31036存储到文件时出错

31037从文件读出时出错

5 无效的过程调用或参数
6 溢出
7 内存不够
9 下标越界
10 数组长度固定或临时锁定
11 被零除
13 类型不匹配
14 字符串空间溢出
28 堆栈空间溢出
35 Sub 或 Function 未定义
48 加载 DLL 时出错
51 内部错误
53 文件未找到
57 设备 I/O 错误
58 文件已存在
61 磁盘已满
67 文件太多
70 没有权限
75 路径/文件访问错误
76 <nobr style="color:#6600ff; border-bottom:#6600ff 1px dotted; background-color:transparent; text-decoration:underline"> 路径</nobr>未找到
91 未设置对象变量或 With 块变量
92 未初始化 For 循环
94 无效的 Null 使用
322 无法创建必要的临时文件
424 要求使用对象
429 ActiveX 部件无法创建对象
430 类不支持 Automation
432 Automation 操作过程中，未找到文件名或类名
438 对象不支持此属性或方法
440 Automation 错误
445 对象不支持此操作
446 对象不支持命名的参数
447 对象不支持当前区域设置
448 未找到命名参数
449 此参数必选
450 参数个数错误或无效的属性赋值
451 对象不是集合
453 未找到指定的 DLL 函数
455 代码<nobr style="color:#6600ff; border-bottom:#6600ff 1px dotted; background-color:transparent; text-decoration:underline">资源</nobr>锁定错误
457 此键已和集合中的元素关联
458 VBScript 中不支持使用 Automation 类型的变量
500 变量未定义
501 非法赋值
502 用此对象进行 Script 编程会出错
503 对象不能安全初始化
1001 内存不够
1002 语法错误
1003 缺少“:”
1004 缺少“;”
1005 缺少“(”
1006 缺少“)”
1007 缺少“]”
1008 缺少“{”
1009 缺少“}”
1010 缺少标识符
1011 缺少“=”
1012 缺少“If”
1013 缺少“To”
1014 缺少“End”
1015 缺少“Function”
1016 缺少“Sub”
1017 缺少“Then”
1018 缺少“Wend”
1019 缺少“Loop”
1020 缺少“Next”
1021 缺少“Case”
1022 缺少“Select”
1023 缺少<nobr style="color:#6600ff; border-bottom:#6600ff 1px dotted; background-color:transparent; text-decoration:underline">表达</nobr>式
1024 缺少语句
1025 语句未结束
1026 缺少整型常数
1027 缺少“While”或“Until”
1028 缺少“While”、“Until”或语句结尾
1029 局部变量或参数过多
1030 标识符过长
1031 无效的编号
1032 无效的字符
1033 未终止字符串常数
1034 未终止注释
1035 嵌套的注释
1037 “Me”关键字使用无效
1038 “Loop”缺少“Do”
1039 无效的“Exit”语句
1040 无效的“For”循环控制变量
1041 名称被重定义
1042 必须是行中的第一个语句
1043 无法为非 ByVal 参数赋值
1044 调用 Sub 时不能使用括号
1045 缺少字母常数
1046 缺少“In”
32766 True
32767 False
32811 未找到元素