如何解决VBA运行时错误‘1004’：应用程序定义或对象定义错误

图中黄线标注为报错发生位置，可对照下述内容优先排查该行涉及的对象、参数是否合法。

VBA错误代码1004常见触发原因 #

• 引用不存在的工作表/工作簿：比如代码调用Worksheets("业务表")时当前工作簿没有对应名称的工作表，或目标工作簿未完成打开就直接执行引用操作
• 操作对象权限不足：目标工作表处于保护状态下修改锁定单元格、操作的文件设置了只读属性、当前账号对文件存储路径没有读写权限
• 单元格区域引用非法：引用超出Excel行列最大限制的区域、给Range对象传入格式不符合规范的地址参数
• 复制粘贴规则不匹配：复制的区域大小和粘贴的目标区域大小不一致、复制操作完成后剪贴板被清空才执行粘贴动作
• 公式写入语法错误：通过VBA向单元格写入公式时，公式的引号、参数格式不符合Excel语法要求，或使用了当前Excel版本不支持的函数
• 文件保存参数错误：保存文件时目标路径不存在、文件名包含/\<>?:*等非法字符、覆盖同名文件时没有处理弹窗权限

调试操作步骤 #

• 在报错行前添加断点，代码运行到断点位置时逐一校验该行用到的所有对象是否存在，可通过Is Nothing判断对象是否被正确初始化
• 将报错行涉及的所有参数值打印到立即窗口校验，比如操作Range对象时执行Debug.Print 目标Range变量.Address确认引用的区域是否符合预期
• 临时注释原有报错逻辑，替换为最简测试代码缩小问题范围：比如原本报错行是写入公式，可先改为写入普通文本，确认基础的单元格写入功能是否正常
• 核查操作目标的状态：确认操作的工作表未被保护、目标文件没有被其他程序锁定、路径及文件名没有非法内容

内容的提问来源于stack exchange，提问作者dDan.data