правильные макросы по сортировке

[grim]

допустим есть у нас много много строк (десятки тысяч) и надо нам их сортировать по хитрому способу или разбить какието стринговые ячейки на несколь ну и тд.
Эксперементально проверено что если в цикле постоянно переключаться между листами использая технлогию Range(..).select , tmp= ActiveCell.copy, Sheet().Select, Range(..).select; ActiveCell.Value=tmp или не дай бог еще методы copy и paste то все работает НЕРЕАЛЬНО долго
вопрос
как все оптимизировать - как задавать ячейкам значения сразу без многочисленных селектов

вопрос ламерский но уж какой есть

[Maks the best]

для одиночных ячеек не используй Select используй

Код: Выделить всё

tmp=Range(..) и Sheet(..).Range(..)=tmp или Sheet(..).cells(r,c)=cells(r,c)

[uhm]

Забудь вообще про Select и ActiveCell

Даже копировать можно без них - Range(...).Copy -> Range(...).PasteSpecial. Но лучше (если нужно копировать только значения) вообще обойтись без Copy, что-нибудь типа:

Worksheets("траляля").Range("A1").value=Worksheets(2).Cells(10,25).Value

[grim]

спасибо большое