Страницы: 1
RSS
Поиск нижней границы динамического диапазона
 
Здравствуйте! Огромная просьба помочь.

Имеется таблица со значениями, таблица начинается от ячейки B3 и заканчивается каждый раз по разному. Количество столбцов постоянно, меняется только количество строк. Необходимо определить последнюю строку таблицы(или первую пустую) строку(допустим это будет строка 7) и установить границы получившегося диапазона (для примера B3:Т7). Я нашел как найти пустую строку, нашел как устанавливаются границы, но как это связать и привязать не пойму. Просьба помочь, натолкнуть. Заранее благодарю!
 
Код
Sub uuu()
    With ActiveSheet
        MsgBox .Cells(3, 2).CurrentRegion.Address
    End With
End Sub
 
Код
Sub last()
Range(ActiveSheet.Columns(1).Find("*", , xlFormulas, xlWhole), Cells(Rows.Count, 1).End(xlUp)).Select
End Sub
Можно вот так.
Код
Sub last()
Dim lr As Long 
lr = Cells(Rows.Count, 1).End(xlUp).Row
Range("B3:T" & lr).select
End sub
А можно вот так.
 
Всем ОГРОМНОЕ СПАСИБО! все получилось.
Страницы: 1
Наверх