一个我怎么也没看出来哪儿出错的bug....

VegetableBird · 发表于 2011-4-21 09:03

真是活见鬼了就这一行 If Cells(i, c) = "" Then Rows(i).Delete
死活报错啊怎么看都没问题啊靠

VegetableBird · 发表于 2011-4-21 09:14

莫名其妙又搞定了谢谢楼楼上的大哥............

dsmch · 发表于 2011-4-21 09:17

已经和你说明原因了，看附件

删除空行.rar (10.51 KB, 下载次数: 4)

VegetableBird · 发表于 2011-4-21 09:19

为啥直接用inputbox不行啊我以前就是用这个直接输入的啊

dsmch · 发表于 2011-4-21 09:23

inputbox函数默认为文本，你用的inputbox方法，两个概念不同。

VegetableBird · 发表于 2011-4-21 10:51

那我直接输入数字也不行么程序还是要报错？

VegetableBird · 发表于 2011-4-21 10:59

咦，貌似不是因为文本跟数字不转换所以报错的问题。我单单只输入一行
c = Application.InputBox("Enter a number")
然后执行 If Cells(c, 2) <> 0 Then就不会报错
可我要是多输入一行
c = Application.InputBox("Enter a number")
d = Application.InputBox("Enter a number")
然后执行If Cells(c, d) <> 0 Then就会报错
这是什么原因啊
一个行，两个就不行？？？

dsmch · 发表于 2011-4-21 11:40

InputBox前有没有Application.用法不一样

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

[已解决] 一个我怎么也没看出来哪儿出错的bug....