在VBA里如何获取当前工作表里数据的行数和列数

发布网友发布时间：2022-05-25 20:38

共2个回答

热心网友时间：2024-03-02 00:48

iRows=activesheet.usedrange.rows.count
iColumns=activesheet.usedrange.Columns.count

'如果表格前面的几行或几列可能是空的，需要获得最下面的行数和最右面的列数：
with activesheet.usedrange
iEndRow=.rows.count+.row-1
iEndColumn=.Columns.count+.column-1
end with

热心网友时间：2024-03-02 00:49

Sub test1()
A = ActiveCell.Row
B = ActiveCell.Column
MsgBox A & "行，" & B & " 列", vbInformation
End Sub

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。E-MAIL:11247931@qq.com