Войти

Показать полную графическую версию : Как вызвать медот Sort по типу VB из D6?


St_Klaus
08-01-2006, 22:55
Вот работающий вызов сортировки листа в VBA Excel:

Selection.Sort Key1:=Range(DayXStr + LimAreaT), Order1:=xlAscending, _
Key2:=Range("A2") _ , Order2:=xlAscending, Key3:=Range("B2"), _
Order3:=xlAscending, Header:= _ xlNo, OrderCustom:=1, MatchCase:=False,
_ Orientation:=xlTopToBottom
Имею:


XlApp : TExcelAppication;
WkBook : TExcelWorkBook;
WkSheet : TExcelWorkSheet;
Я начинаю так:

WkSheet.Range['A1','AI1'].Sort(..................

Пожалуйста, закончите за меня вызов сортировки листа Excel — аналогично VB — из процедуры Delphi.
Что дальше? http://forum.oszone.ru/images/smilies/new/swoon.gif
Параметры в списке можно понять по прямой аналогии с VB, кроме параметра "Type_:OleVariant" — в чем его смысл?

Ни в доках, ни в хелпе, ни в инете — ни теории, ни примера......
Помогите, пожалуйста... http://forum.oszone.ru/images/smilies/new/sorry.gif

St_Klaus
11-01-2006, 00:14
Господа! Коллеги! Товарищи......

Сегодня мне, наконец, удалось раскрутить сортировку листа Excel из Delphi. Озабоченных проблемой отсылаю на форум, где проходило горячее обсуждение: http://www.progz.ru/forum/viewtopic.php?t=21254.

Практически все параметры в списке можно понять по прямой аналогии с VB, кроме параметра "Type_:OleVariant" - в чем его смысл? Параметр Type_ - объявлен в группе констант XlSortType в Excel2000.


// Constants for enum XlSortType
type
XlSortType = TOleEnum;
const
xlSortLabels = $00000002;
xlSortValues = $00000001;


Для меня эта тема закрыта. Спасибо всем, кто был со мной. http://forum.oszone.ru/images/smilies/beer.gif http://forum.oszone.ru/images/smilies/new/hi.gif




© OSzone.net 2001-2012