Excel VBA判断最后一行/列

判断到哪里结束应该是Excel VBA最常见的操作之一，下面代码能实现这个功能：

 

1. Function LastColumn() As Long     
2.     Dim ix As Long 
3.     ix = ActiveSheet.UsedRange.Column - 1 + ActiveSheet.UsedRange.Columns.Count 
4.     LastColumn = ix   
5. End Function 
6.  
7.  
8. Function LastRow() As Long 
9.     Dim ix As Long 
10.     ix = ActiveSheet.UsedRange.Row - 1 + ActiveSheet.UsedRange.Rows.Count 
11.     LastRow = ix 
12. End Function 

本文转自 h2appy  51CTO博客，原文链接：http://blog.51cto.com/h2appy/825128，如需转载请自行联系原作者