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

[Andrey85]

Здравствуйте. Подскажите пожалуйста. Как можно сделать сортировку в Excele. Я использую компонент ExcelApplication. Есть столбец с датами и мне по ним нужно упорядочить данные. Но по столбцу полностью нельзя, дальше идут другие данные. А мои даты находятся в именованном диапазоне date_otr. Кто может подскажите,пробовал делал макрос, смотрел код. Попытался изобразить на Delphi не получилось, ругается. Вот код

ExcelApplication1.Range['date_otr',EmptyParam].Sort((ExcelApplication1.Range['date_otr',EmptyParam]),xlAscending,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,xlNo,EmptyParam,EmptyParam,xlTopToBottom,xlPinYin,EmptyParam,EmptyParam,EmptyParam);

Заранее спасибо.

[dolbanov]

Компонентами оффиса не пользуюсь=) Но вот код примерный=)

uses ComObj;
var
XLApp,Sheet:Variant;
begin
XLApp:= CreateOleObject('Excel.Application'); //инициализация экселя
XLApp.Workbooks.Add(-4167); //создаем новую книгу или открываем
XLApp.Visible:=true; //делаем эксель видимым
XLApp.Workbooks[1].WorkSheets[1].Name:='Имя'; //присваеваем листу книги имя
Sheet:=XLApp.Workbooks[1].WorkSheets['Имя']; //для удобства работы с листом чтоб каждый раз не печатать XLApp.Workbooks[1].WorkSheets['Имя'].  ...
//Ну и сама сортировка (большая часть данных берется из маркроса самого экселя)
// sheet.Range[Sheet.Cells[1,1],Sheet.Cells[10,10]] - задает диапазон который будем сортировать
//Key1:=sheet.Range[Sheet.Cells[3,3],Sheet.Cells[10,3]] - задает столбец по которому идет сортировка
//с остальными параметрами поэксперементируй либо просто возьми из маркроса экселя
sheet.Range[Sheet.Cells[1,1],Sheet.Cells[10,10]].Sort 
(Key1:=sheet.Range[Sheet.Cells[3,3],Sheet.Cells[10,3]], Order1:=1, Header:=0, OrderCustom:=1, MatchCase:=False, Orientation:=1, DataOption1:=0);
end;

[Andrey85]

Спасибо! Я наверное перепишу все через OLE.