分享一款自己做的经销存系统

huang1314wei · 发表于 2017-3-16 22:58

aails6543 发表于 2017-3-16 20:54
楼主你好这是你之前贴的一中代码

Sub cc()

aails6543 · 发表于 2017-3-16 23:56

本帖最后由 aails6543 于 2017-3-17 00:02 编辑

huang1314wei 发表于 2017-3-16 22:58

我用的是 64位 excel 2010不知为何执行中断在倒数第二行出错1004错误
“应用程序定义或对象定义错误 1004”
无标题.png

是不是要引用什么对象库

aails6543 · 发表于 2017-3-17 01:07

huang1314wei 发表于 2017-3-16 22:58

我试找了几十遍了这个1004错误定义的解决方法。都没有有效的解决这个问题。一直是1004错误
可否传一下你的表格让我来打开运行看看是否仍然出错？

lhy7212 · 发表于 2017-3-25 09:07

aails6543 发表于 2017-3-17 01:07
我试找了几十遍了这个1004错误定义的解决方法。都没有有效的解决这个问题。一直是1004错误
可否传一下 ...

今天星期六，上午没事，给你回复一下：

Set r = oDoc.All.tags("table")(3).Rows

改

Set r = oDoc.All.tags("table")(6).Rows

就OK了，别问我原因，我也不知道，我试出来的。你找了几十遍，方向错了，结果是没有的。

aails6543 · 发表于 2017-3-25 10:08

lhy7212 发表于 2017-3-25 09:07
今天星期六，上午没事，给你回复一下：

Set r = oDoc.All.tags("table")(3).Rows

真的可以了。谢谢你，非常感谢。

xiaoyu528 · 发表于 2017-7-2 00:29

不错中的不错，感谢分享

驫驫必龘 · 发表于 2017-7-13 13:49

谢谢楼主:辛苦了

xiaoyidemm · 发表于 2017-12-8 23:05

做得很好，学习，尤其是态度更值得敬佩

p4607596 · 发表于 2018-6-9 12:00

刚刚学习表格VBA,在学习中遇到好多困难,希望有这么一位神一样的老师.来解析

东来东往 · 发表于 2018-6-9 17:28

自大师学习

		自动登录	找回密码
密码			免费注册

[原创] 分享一款自己做的经销存系统