Сортировка в Excel

← →
$Hic0 (2004-07-14 11:27) [0]

Добрый день, помогите поалуйста, вопрос тупой но все же вы навреняка через это проходили. Результаты рассчетов я скидываю в эксель, возникла необходимость программано упорядочить в порядке возростания столбик с данными. Из Дельфи сколько я не тыкался сделать этого не получилось, туча параметров для заполнения метода Sort понятия о которых я совершенно не имею. Пока сделал так. Написал макрос внутри экселя который сортирует
Range("A11:A110").Select Selection.Sort Key1:=Range("A11"), Order1:=xlAscending, Header:=xlGuess, _ OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _ DataOption1:=xlSortNormal
И вызываю его из Дельфи. Это все не то я, я прерасно понимаю
но сделалть что-то вроде
ExcelWorkSheet1.Range[2,mu+2].Sort2,xlAscending,mu+2,xlGuess,xlTopToBottom,0,0,0,0,0,0,xlSortNormal,0,0,0);
естсетвенно не получилось, потому что все делается без понимания, а для того чтобы быстро сделать.
Просьба не бить сильно за тупой вопрос.

← →
Тимохов © (2004-07-14 11:31) [1]

у вас позднее связываение (т.е. объект через createoleobject создаете)?
если да, то так и пишите

Selection.Sort(Key1:=Range("A11"), Order1:=xlAscending, Header:=xlGuess,OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, DataOption1:=xlSortNormal)

такой синтаксис для позднего связывания дельфи допускает

Наверное все-таки так
Selection.Sort(Key1:=Range["A11"], Order1:=xlAscending,
Header:=xlGuess,OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom,
DataOption1:=xlSortNormal)

Сортировка в Excel Найти похожие ветки