Selection.Sort....

hola Ager

Tengo el siguiente codigo:

Sheets("region").Select
Sheets("region").Range("D25:J34").Select
Selection.Sort Key1:=Range("E26"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal

Lo que deberia hacer, es ordenala. Pero cuando llega a
Selection.Sort.. Me da error, "Error definido por la aplicacion o el
objeto".

Que me falta? que me sobra???.
Les comento que este codigo esta dentro de "Microsoft Excel Objetos", lo
necesito ahi, porque anteriormente estoy copiando una solapa de un libro.

en cuanto a lo de ' que este codigo esta dentro de "Microsoft Excel
Objetos"', la verdad es que n queda nada claro ni donde ni porque,
pero bueno

salvo que en las versiones posteriores a la 2002/xp el metodo sort sea
diferente (en 2007 creo que si pero no lo se), creo que el error (como
poco) te debe venir de la asignacion que haces al argumento
'Orientation'. Yo al menos en la ayuda no veo entre las posibles
constantes asignables la que mencionas (xlTopToBottom), tan solo
xlByRows y xlByColumns

prueba a omitir dicho argumento )y ya de paso, salvo que lo estes
haciendo conscientemente por algun motivo concreto, omite tambien
OrderCustom, MatchCase:=False, y DataOption1 <en cuanto a estos
ultimos no me hagas demasiado caso, pero prueba lo de Orientation>)

a ver si hay suerte

un saludo
Ivan