¿Cómo puedo poner un botón para ordenar en excel?

Seguramente estoy pidiendo algo muy sencillo pero es que no logro encontrar como hacer para añadir un botón en la primera celda de una columna de excel para que ordene datos automáticamente. Solo tengo dos columnas y de ellas solo necesito ordenar la primera (por supuesto sin que deje de relacionarse con la segunda) .

Añado una foto del botón (o desplegable) que necesito por si no me he explicado bien

Respuesta

Seria de la siguiente manera

Sub ordenar()
ActiveWorkbook.Worksheets("nombre de tu hoja").Sort.SortFields.Clear
ActiveWorkbook.Worksheets("nombre de tu hoja").Sort.SortFields.Add Key:=Range("a1:a100"), _
SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
With ActiveWorkbook.Worksheets("nombre de tu hoja").Sort
.SetRange Range("A1:C100")
.Header = xlGuess
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With
End Sub

Nombre de tu hoja ya sabe es el nombre la hoja

A1:a100 es el rango en la columna a organizer

A1:c100 es el rango de la tabla a organizer

Este procedimiento esta de menor a mayor

si te silve no olvide valorar p[ara cerrar la pregunta 

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas