作者：乔山办公网日期：
返回目录：excel表格制作
Sub jiji()
Dim i
i = Sheet1.Range("iv1").End(xlToLeft).Column
MsgBox "第一行最后一个非空单元格列号为" & i
End Sub
excel获取指定工作表的行数、列数的具体操作方zd法如下：
1.首先，打开Excel软件
2.打开源数据文件，假如需要根据证券代码显示出行业名称。现在回，在I1单元格输入”证券代码“，在J1单元格输入”Nnindnme"。
3.如图，选中J2单元格，单击工具栏中的"插入函数答“
4.弹出”插入函数“对话框，选择插入IF函数
5.在弹出的”函数参数“对话框中，设置Logical_test参数为”I2=“”，将Value_if_true设置为“”，在Value_if_false参数框中输入“VLOOKUP(I2,A2:B2846,2)，然后点击确定
Sub finda()
'用VBA更简单zhidao一些
'用Find方法
'然后用row 属性返回内行数，用column返回列数
'例如：
R = Range("a1:d100").Find("N15").Row
C = Range("a1:d100").Find("N15").Column
MsgBox R & C
End Sub
希望能容帮到你！
工作表Sheet1的A列的数据行数
Sheet1.[A65536].End(3).Row