Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Сортировка в Excel [D7, WinXP]

$Hic0 © (2004-07-14 11:27:00)
Добрый день, помогите поалуйста, вопрос тупой но все же вы навреняка через это проходили. Результаты рассчетов я скидываю в эксель, возникла необходимость программано упорядочить в порядке возростания столбик с данными. Из Дельфи сколько я не тыкался сделать этого не получилось, туча параметров для заполнения метода 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:00) [1]
у вас позднее связываение (т.е. объект через createoleobject создаете)?
если да, то так и пишите

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

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

Тимохов (2004-07-14 11:31:00) [2]
Наверное все-таки так
Selection.Sort(Key1:=Range ['A11 '], Order1:=xlAscending,
Header:=xlGuess,OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom,
DataOption1:=xlSortNormal)

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »