Set AllCells = Range("A1:A105")
Мне надо не конкретно, верхняя граница диапазона д.б.
последней ячейкой со значением...


Set AllCells = Range(Range("A1"),Cells.SpecialCells(xlLastCell))Сейчас этот форум просматривают: Google-бот, SemrushBot и гости: 3