GEARZ.de

All snippets are without any warranty.
Alle Snippets sind ohne jegliche Gewähr oder Garantie.



Excel: Get last Row / Column   <back to snippets>

intLastRow = UBound(ActiveSheet.UsedRange.Value2, 1) + ActiveSheet.UsedRange.Row - 1

intLastColumn = UBound(ActiveSheet.UsedRange.Value2, 2) + ActiveSheet.UsedRange.Column - 1