关于计算行数语句的困惑

jxnu · 发表于 2010-8-4 15:32

本帖最后由 jxnu 于 2012-2-20 18:04 编辑

'---------------------------------
newRowCount = Range("A" & Rows.Count).End(xlUp).Row
'--------------------------------
如果我打开一个工作表,里面有好多行(不会超过5000),这些行里面都有数据,然后我要提取这些行的行数.

用上面的语句是不是有时候不太好使...
我理解上面的语句的意思是:相当于选中A1然后按ctrl+shift+向下键,选中的行数.
如果是按我这样理解的话,按理应该是每次执行的结果都一样,而且也不会出错才对啊.可是经常会出错,
现在我用for循环来判断单元格是否有值来确定行数,目前是很准也很快,不晓得明天是不是会跟上面的语句一样.

困惑中::Q ,请指点..谢谢

jxnu · 发表于 2010-8-4 15:43

在线等哦.

jjchenjf · 发表于 2010-8-4 16:04

a=sheets("工作表名") .[a65536].end(xlup).row
如果有标题栏则减一行。

lbzcc · 发表于 2010-8-4 16:06

http://club.excelhome.net/viewth ... 5&highlight=end
看了上贴你就会明白了。

Zamyi · 发表于 2010-8-4 16:08

我理解上面的语句的意思是:相当于选中A1然后按ctrl+shift+向下键,选中的行数.
错！
Range("A" & Rows.Count)是A列最后一个单元格，
Range("A" & Rows.Count).End(xlUp)相当于选择Range("A" & Rows.Count)时，按CTRL+向上箭头得到的单元格。
如果分不清，如何得到正确结果？

jxnu · 发表于 2010-8-4 16:12

原帖由 jjchenjf 于 2010-8-4 16:04 发表
a=sheets("工作表名") .[a65536].end(xlup).row
如果有标题栏则减一行。

很遗憾.效果一样.而且出来的结果一样.

jxnu · 发表于 2010-8-4 16:25

原帖由 Zamyi 于 2010-8-4 16:08 发表
我理解上面的语句的意思是:相当于选中A1然后按ctrl+shift+向下键,选中的行数.
错！
Range("A" & Rows.Count)是A列最后一个单元格，
Range("A" & Rows.Count).End(xlUp)相当于选择Range("A" & Rows.Count)时，按CT ...

多谢...

经楼上各位的指点,终于发现问题的所在了.
表里有自动筛选,最后一行就是 576.我的在去掉自动筛选(Selection.AutoFilter)前计算了行... 所以每次都会出错.

我还一直以为是去自动筛选的时候表卡到了,程序还没来的及就往下去了.

十分感谢楼上各位!!! 谢谢

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

[已解决] 关于计算行数语句的困惑