|
楼主 |
发表于 2009-8-4 18:22
|
显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件 ★ 免费下载 ★ ★ 使用帮助★
如果usedrange显示的区域不正确,可用下面代码正确返回使用区域的最后行号和列号
i = Cells.Find("*", , , , 1, 2).Row '正确返回使用区域的最后一行的行号
j = Cells.Find("*", , , , 2, 2).Column '正确返回使用区域的最后一列的列号
'上面两句等同于下面两句
i = Cells.Find("*", , , , xlByRows, xlPrevious).Row '正确返回使用区域的最后一行的行号
j = Cells.Find("*", , , , xlByColumns, xlPrevious).Column '正确返回使用区域的最后一列的列号
'上面每句中的两个参数都应该指定,否则有时会因为调用上一次查找时保存的参数值而出现错误。
http://club.excelhome.net/viewth ... p;page=3#pid3050565 |
|