Координаты последней ячейки в таблице

Подробности

Опубликовано 14.06.2015 15:50

Определяем последние ячейки координаты в текущей таблицы.

Dim lngLastRow, lngLastCol as Long
 
'Номер последней строки на листе
varLastRow = ActiveSheet.UsedRange.Rows.Count
 
'Номер последнего столбца на листе
varLastCol = ActiveSheet.UsedRange.Columns.Count