判断到哪里结束应该是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