как сортиовать данные перенесенные в Excel

alb

Well-known member
13.07.2005
212
0
#1
вопрос в сабже
пишу вот что
Set xl = CreateObject("Excel.Application")
......
.....
.....
xl.Range("A5:T31").Select
здесь область выделяется нормально
xl.Selection.Sort xl.Range("A5"), 1, 1,1, False, 1,0 засада вот тут вываливается ошибкой неверная ссылка

как правильно ссылкуто передавать
 

alb

Well-known member
13.07.2005
212
0
#2
так и не смог решить
решил переносимый массив сначало сортировать средствами лотуса потом перенести.
 
L

Lexa-xa

#3
xl.Selection.Sort xl.Range("A5"), 1, 1,1, False, 1,0 засада вот тут вываливается ошибкой неверная ссылка
Возможно вставил мало запятых (параметров)
У меня вот так работает
.Range(tmpCol1 & row & ":" & tmpCol2 & (row + cntM)).Select
Call .Selection.Sort(.Range(tmpCol1 & row),1, , , , , , 0, 1, False, 1, , 0, , )

в Range всякие параметры, не обращай внимания :unsure:

из Хелпа
expression.Sort(Key1, Order1, Key2, Type, Order2, Key3, Order3, Header, OrderCustom, MatchCase, Orientation, SortMethod, DataOption1, DataOption2, DataOption3)
 

Medevic

Что это ? :)
Lotus team
10.12.2004
3 346
1
#4
xl.Selection.Sort xl.Range("A5"), 1, 1,1, False, 1,0
А с параметрами всё в порядке?
Вот выдрал из хелпа:
Sort(Key1, Order1, Key2, Type, Order2, Key3, Order3, Header, OrderCustom, MatchCase, Orientation, SortMethod, DataOption1, DataOption2, DataOption3)
У тебя явно что-то не так.
Key2 равен 1. А должен быть или текст, или Range.
Order2 равен False. А допустимые значения 1 или 2.
И т.д.
 

alb

Well-known member
13.07.2005
212
0
#5
visual basic?

А с параметрами всё в порядке?
шя попробую как у вас, я просто написал макрос в екселе и по его подобию в лотус скрипте пытался.
в том что выдал макрос и в правду мало парметров чем вы указали

точно дело было в парметрах
только у меня со скобками не работает
а вот так работает

xl.Range("A5:T31").Select
xl.Selection.Sort xl.Range("A5"),1, , , , , , 0, 1, False, 1, , 0, ,


спасибо