[已解决]返回最后行号

海棠你好

问题：如何将 sheet3 中最后一个单元格所在行号 赋值给变量a
本例子中  就是将13赋值给变量a（而不是将8赋值给a）

最佳答案

月排行榜 / 总排行榜

yorkchenshunan

2015-9-12 16:15

1. Sub tt()
   
2. Dim a%
   
3. a = Sheets("sheet3").UsedRange.Rows.Count + Sheets("sheet3").UsedRange.Row - 1
   
4. End Sub
   

复制代码

跳转到最佳答案楼层

金樽空对月

如代码：
a=sheet3.range("a65536").end(xlup).row

yorkchenshunan

1. Sub tt()
   
2. Dim a%
   
3. a = Sheets("sheet3").UsedRange.Rows.Count + Sheets("sheet3").UsedRange.Row - 1
   
4. End Sub
   

复制代码