判断到哪里结束应该是Excel VBA最常见的操作之一,下面代码能实现这个功能:
- Function LastColumn() As Long
- Dim ix As Long
- ix = ActiveSheet.UsedRange.Column - 1 + ActiveSheet.UsedRange.Columns.Count
- LastColumn = ix
- End Function
-
-
- Function LastRow() As Long
- Dim ix As Long
- ix = ActiveSheet.UsedRange.Row - 1 + ActiveSheet.UsedRange.Rows.Count
- LastRow = ix
- End Function
-
本文转自 h2appy 51CTO博客,原文链接:http://blog.51cto.com/h2appy/825128,如需转载请自行联系原作者
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)