como automatizo el comado de orden ascendente en excel

Hola Ric,

Suponiendo que quieres ordenar los registros (filas) del rango [A2:Gn] segun
los datos en la columna A, puedes colocar el codigo que te pongo a
continuacion en el modulo VBA de la hoja en cuestion. Para ello:

1) haz clic-derecho sobre el nombre de la hoja en cuestion en una de las
pestañas de la parte de abajo de la ventana de Excel.
2) Elige la opcion Ver Codigo para abrir el editor VBA.
3) En la ventana mas grande a la derecha pega el codigo de abajo
4) Ahora pulsa Alt+F11 para volver a la hoja.
5) prueba introducir algo en la columna [A]

Saludos,
KL

Private Sub Worksheet_Change(ByVal Target As Range)
With Me
If Intersect(Target, .Range("A:A")) _
Is Nothing Then Exit Sub
uFila = .Cells(.Rows.Count, "A").Row
.Range("A2:G" & uFila).Sort _
Key1:=Range("A1"), _
Order1:=xlAscending, _
Orientation:=xlTopToBottom
End With
End Sub


"Ric" wrote in message
news:

Deseo realizar la automatizacion de un rango de campos en excel en orden
ascendente o descendente mediante una formula o macro la cual me ordene
automaticamente el rango de campos sin tener que utilizar el icono de
orden
ascendente