设个参数 dim x as integer x=cells.find("*",searchorder :=xlbyrows, searchdirection:=xlprevious).Row 返回的X值就是行数 Dim y As Integer y = Cells.Find("*", searchorder:=xlByColumns, searchdirection:=xlNext).Column 返回的y就是列数
第2个回答 推荐于2016-03-08
Sub tt() a = Sheets("1").UsedRange.Rows.Count b = Sheets("1").UsedRange.Columns.Count MsgBox a MsgBox b End Sub 主要用UsedRange.Rows本回答被提问者采纳