vba找到有数的最后一行 vba获取有内容的最后一行

#vba 查找单元格并返回最后一个行数# 可以从后面循环开始查找 Sub 查找最后一个中国() Dim i For i = 10 To 1 Step -1 If Cells(i, 1) = ＂中国＂ Then MsgBox ＂第＂ & i & ＂行＂ Exit Sub End If Next End Sub

不想去看23对应字母,如下也能得到结果.range(＂A65536＂).offset(0,22).end(xlup).row 试试用下面的语句获得总行数 sheet3.usedrange.rows.count1、打开数据表.2、选中一个单元格,同时按键盘上的Ctrl+↓3、选中的单元格迅速就到了最后一行,同时按键盘上的Ctrl+↑.4、选中一个单元格回到了首行,同时按键盘上的Ctrl+→.5、选中一个单元格迅速到了最后一列,同时按键盘上的Ctrl+←.6、又可以迅速回到首列.7、还可以将鼠标移动到单元格下边框上,8、选中单元格迅速跳到最后一行,将鼠标移动到单元格上边框上,鼠标变成上下左右箭头时,双击.鼠标变成上下左右箭头时,双击.

可以用下面的语句:最后一个值 = Sheets(＂sheet1＂).Range(＂A65535＂).End(xlUp).Value 用 col=range(＂C1＂).end(xltoright).column '找到最后非空一列 语句可能存在问题:当A1至A5数据连续时,该语句能返回正确 的结果,但当不连续时,将得不到最后一个非空结果 如1245 将只得到2,而不是5(其中3是空白,如果3有数值,将得到5)

ctrl+下方向键,定位 到有数据的最后一行 ctrl+shift+下方向键 选择 到有数据的最后一行

假设数据在A列,要查找A列最后一个有数值的单元格行号(中间可能有若干空单元格)方法1:使用MATCH函数=MATCH(MAX(A:A)+1,A:A) 如果确定A列含数值的单元格中最大值数字为x,上述公式还可以简化为:=MATCH(y,A:A) 其中,把y替换为比x大的数字即可(例如:x+1)方法2:使用LOOKUP函数=LOOKUP(MAX(A:A)+1,A:A,ROW(A:A)) 其实现思路,与方法1类似.如果确定A列含数值的单元格中最大值数字为x,上述公式还可以简化为:=LOOKUP(y,A:A,ROW(A:A)) 其中,把y替换为比x大的数字即可(例如:x+1)

LOOKUP和ISNUMBER函数综合处理 Excel版本参考:2010 测试数据区域:A1:A13,其中有数字、文本和空格1、选中B1单元格2、输入公式:=LOOKUP(1,0/(ISNUMBER(A1:A13)),A1:A13)3、同时按住CTRL+shift,在按下enter,输入正确公式左右两边有{}符号4、查看效果(100,正确的结果)

1、筛选;2、把数据所在列的“筛选”下拉框中“空白”前的勾去掉;3、点“确定”4、找到最后一列,就是所要找的“有数据的最后一个单元格”.

C1输入公式 =MAX(ROW(A1:A20)*(A1:A20=B1)) 按CTRL SHIFT 回车结束,就得到最后一个与B1相同的最后一个数据的行号,

Sub 地址() i = Worksheets(＂Sheet1＂).UsedRange.SpecialCells(xlCellTypeLastCell).Row j = Worksheets(＂Sheet1＂).UsedRange.SpecialCells(xlCellTypeLastCell).Column MsgBox ＂行号:＂ & i & ＂列号＂ & j2 End Sub 说明:该代码获取的行号和列号,是行和列已使用单元格所组成的矩阵的最后一个单元格,即使最后一个单元格为空也要定位.

一般查找最后一个非空数据,可用LOOKUP函数,如: =LOOKUP(1,0/(A:A＂＂),A:A),这只是举例,根据实情,尽量不引用整列,引用部分区域.