Variant Range = App.OlePropertyGet("Range", "C8");
App.OlePropertyGet("WorkSheets",1).OlePropertyGet("Range","C8:C14").OleProcedure("Select");
App.OlePropertyGet("Selection").OleProcedure("Sort",Range,xlAscending,xlGuess,1,0,xlTopToBottom,xlSortNormal);
Сортировка данных в Excel через OLE
Код: