ник: dodikxxx
Next i
.Range("A1:B200").Sort Key1:=Range("B2"), Order1:=xlAscending, Header:= _
xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
Блин... не могу разобраться... Подскажи пожалуйста что это означает? мне просто надо это применить к рабочим файлам(там немного другие данные и сторочки). И кнопочка такая удобная))) как это сделать... Может в кратце у тебя найдётся минутка?