Скачать: CL | DM;

Сортировка в 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)

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

---

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

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

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.05 c