EXCEL宏使用经验集：[5]获取最后非空行行号

1、以a列为判断标准：

dim t as double

t=worksheets(1).[A65535].end(xlup).row  '针对EXCEL2003

t=worksheets(1).[A1048576].end(xlup).row  '针对EXCEL2010

2、以b列为判断标准：

dim t as double

t=worksheets(1).[B65535].end(xlup).row  '针对EXCEL2003

t=worksheets(1).[B1048576].end(xlup).row  '针对EXCEL2010

3、其它C、D。。。列依次类推。。。