Para Héctor Miguel

Disculpen si me entrometo, pero estás guardando (creo yo) los números como
texto... si deseas seguir utilizandolo así y ordenar como si fueran números,
a tu código agrega

DataOption1:=xlSortTextAsNumbers

O sea, algo así:

E.Range("A1:A10").Sort Key1:=E.Range("A1"), Order1:=xlDescending,
Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortTextAsNumbers

Suponiendo que ordenas con un solo criterio el rango A1:A10 y que E es la
objecto Excel creado en VB





"Luis" escribió en el mensaje
news:06c101c35c4e$4a706430$
Hola Hector.

Disculpa no haber podido escribir antes.

Respecto a el post anterior, lo que hago es
seleccionar un rango de celdas que quiero ordenar
y después le doy al botón de ordenar ascendente. Y
no hago nada más. Lo que ocurre es que si por ejemplo
selecciono los números 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
y los ordeno en orden descendente los coloca asi:
9 8 7 6 5 4 3 2 15 14 13 12 11 10 1.

Adjunto copia del post anterior
-
Asunto: Excel desde otro programa
De: "Luis" Enviado: 8/1/2003
3:10:40 PM

Hola a todos/as.

Tengo un programa escrito en VB6 que abre un documento de
Excel y lo rellena con datos. Lo que ocurre es que si
quiero ordenar estos datos, no lo hace correctamente sino
que los ordena mal. ¿Que puede pasar?

Saludos.

Asunto: Re: Excel desde otro programa
De: "Héctor Miguel"
Enviado: 8/1/2003 11:07:17 PM




Hola, Luis !

... programa ... VB6 que abre un documento de Excel y

lo rellena con datos.

... si quiero ordenar estos datos, no lo hace

correctamente ... ¿Que puede pasar?

==> (con seguridad) el programa "hace EXACTAMENTE lo que
le indicas" (donde, como, etc.) si se puede, asi que...
(es posible que) "esa parte" de las
instrucciones "tiene fallas" (criterios de seleccion, de
ordenamiento, etc.)
¿podrias transcribirla?
_______
Saludos,
Héctor.
MS-MVP
-

Saludos,

Luis.