Форум продуктов IBM Lotus

Общие вопросы => Разработка приложений => Тема начата: Sergey_st85 от 18 Август 2009, 16:25:18

Название: А вот всё-таки попался я с макросами....
Отправлено: Sergey_st85 от 18 Август 2009, 16:25:18

Нужно программно сделать сортировку в экселе.

Макрос показывает:

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

Но я не могу преобразовать это в код лотуса; напишите, как эта ф-ция будет выглядеть? Такая шняга пишет "неверная ссылка":

Set xl= CreateObject("Excel.Application")
xl.visible=False
 Call   xl.Selection.Sort (xl.Range("A1"), 1,1, 1, False, 1,   1)

Название: Re: А вот всё-таки попался я с макросами....
Отправлено: Sergey_st85 от 02 Ноябрь 2009, 10:37:35

Ответ так и не нашел.