书写方法:Sheet1.Range("A" & Sheet1.Rows.Count).End(xlUp)
注释:
1) 格式:A列最大行.End(xlup),注:可以是A列,可以是B列,C列,任意列
2)定位到最大行后,再向上移动到最后一行数据所在的单元格
3)调试语句: Debug.print rng.address '在立即窗口打印出 rng 的地址:$A$18
● 6. 快速定位到:一行中的最后一列单元格
书写方法:Sheet1.Cells(1, ActiveSheet.Columns.Count).End(xlToLeft)
注释:
1) 格式:第一行最大列.End(xlToLeft),注:可以是第1行,第2行,任意行
2) 定位到最大列后,再向左移动到最后一列数据所在的单元格
3) 调试语句:
Debug.Printrng.Address '打印地址
Debug.Printrng.Column '打印数字列号
Debug.Print "最后非空单元格地址为:" & rng.Address & "列号:"& rng.Column _
& "行号:" & rng.Row & "数值:"& rng.Value
在立即窗口打印出:
$K$1
11
最后非空单元格地址为:$K$1列号:11行号:1数值:123