【转帖】如何知道excel内容的多少?
 

如何知道excel内容的多少?
www.dimcax.com
如何知道excel内容的多少?
怎样在vb中获得excel表格有多少内容,即用户输入到哪一行/列为止.
我现在是傻傻的在输入结束后在输入一个"输入完毕",太别扭了.
使用usedrange返回所使用的单元格区域
尹凡
email: efan
'
'计算工作表有效数据行数
'
public function sheetrows(acworksheet as excel.worksheet) as long
dim oldrange as excel.range
set oldrange = pubexcelapp.activecell
acworksheet.range("a1").activate
sheetrows = pubexcelapp.activecell.currentregion.rows.count '有效数据行数
oldrange.activate '恢复工作表原来的光标位置
end function