Ordenar filas de forma ascendente...!

03/06/2008 - 05:27 por Rickhunter | Informe spam
Ok gracias por dejarme preguntar.
Como ya comenté tengo una tabla con 2800 filas y necesito ordenar las celdas
de "cada" fila en forma ascendente.
Ya trate de hacerlo con click derecho y format cells, pero el porblema es
que con este método sólo puedo ordenar una fila a lavez. Hay alguna forma de
ordenar toda la tabla de una sola vez?

A B C D A B C D
1 3 5 7 6 1 3 5 6 7
2 6 5 4 3 --> Así > 2 3 4 5 6
3 7 5 3 4 3 3 4 5 7


Gracias de antemano
 

Leer las respuestas

#1 Héctor Miguel
03/06/2008 - 07:09 | Informe spam
hola, !

un detalle es que al ordenar se da tratamiento a la "lista" como un conjunto de elementos "asociados"
si necesitas un trato (diferencial) por "cada fila" (obviamente) necesitas "tratarlas" tambien por separado
y si no quieres hacerlo (tu) una por una... puedes desarrollar una macro que lo haga (por ti)

prueba con algo +/- como lo siguiente y...
si cualquier duda (o informacion adicional)... comentas ?
saludos,
hector.

Sub Ordena_por_filas()
Application.ScreenUpdating = False
Dim Fx As Integer
With Range("a1:d2800") ' <= OJO... AJUSTA al rango "real" de tus datos '
For Fx = .Row To .Row + .Rows.Count
With .Offset(Fx - 1).Resize(1)
.Sort _
Key1:=.Cells(1), _
Order1:=xlAscending, _
Header:=xlNo, _
Orientation:=xlLeftToRight
End With
Next
End With
End Sub

__ la consulta original __
... una tabla con 2800 filas y necesito ordenar las celdas de "cada" fila en forma ascendente.
Ya trate de hacerlo con click derecho y format cells
pero el porblema es que con este metodo solo puedo ordenar una fila a lavez.
Hay alguna forma de ordenar toda la tabla de una sola vez?
A B C D A B C D
1 3 5 7 6 1 3 5 6 7
2 6 5 4 3 --> Asi > 2 3 4 5 6
3 7 5 3 4 3 3 4 5 7

Preguntas similares