excel运行时错误1004,应用程序定义或者对象定义错误,这个怎么处理

楼上说的对，因为range（）里面的是文本或者文本变量，但是你上面定义的rng是个range变量，可以直接作range用，加了个range（）反而就会出错了

第三方大夫发给

10.3在win7下是不稳定的！建议还用xp或者升级金蝶，金蝶问题找我！

设置xp兼容模式试过吗？sql正常不？

应用程序错误问题：
1.木马病毒造成常用病毒捆绑应用程序和系统文件，然后安全杀毒软件把有木马病毒应用程序和系统文件查杀导致。
2.应用程序组件丢失，应用程序完整的运行需要一些系统文件或者某些ll文件支持，如果应用程序组件不完整也会导致的。
3.系统文件损坏或丢失，盗版系统或Ghost版本系统，很容易出现该问题。
4.操作系统自身的问题，操作系统本身也会有bug 。
5.硬件问题，例如内存条坏了或者存在质量问题，或者内存条的金手指的灰尘特别多。

应用程序错误解决方法：
1.检查电脑是否存在病毒，请使用百度卫士进行木马查杀。
2.系统文件损坏或丢失，盗版系统或Ghost版本系统，很容易出现该问题。建议：使用完整版或正版系统。
3.安装的软件与系统或其它软件发生冲突，找到发生冲突的软件，卸载它。如果更新下载补丁不是该软件的错误补丁，也会引起软件异常，解决办法：卸载该软件，重新下载重新安装试试。顺便检查开机启动项，把没必要启动的启动项禁止开机启动。
4.如果检查上面的都没问题，可以试试下面的方法。
打开开始菜单→运行→输入cmd→回车，在命令提示符下输入下面命令 for %1 in (%windir%\system32\*.dll) do regsvr32.exe /s %1回车。
完成后，在输入下面
for %i in (%windir%\system32\*.ocx) do regsvr32.exe /s %i 回车。
如果怕输入错误，可以复制这两条指令，然后在命令提示符后击鼠标右键，打“粘贴”，回车，耐心等待，直到屏幕滚动停止为止（重启电脑）。

Range("A1:D599").Select 这句代选择的是代码所在的工作表，如果该工作表处于非激活状态则出错。

修改为如下任意一个（根据自己需要）

1、
sheet("sheet1").activate 先把要选择的工作表激活，然后再选择。

Range("A1:D599").Select
2、
ActiveSheet.Range("A1:D599").Select 选择当前激活的工作表的指定区域
3、

sheet("sheet1").Range("A1:D599").Select 选择指定工作表的指定区域。sheet1 为工作表名称。

一台电脑貌似不能安装两个版本的office吧。建议卸载掉一个，然后在重新安装2007试试看。
下载并解压本站提供的数据包，直接双击打开
office 2013卸载工具会自动检测你的电脑是否有office 2013
提示你是否要卸载，点击“yes”
过个几十秒就可以了，再重启电脑就ok了。