John Arizaga

Tengo una base de datos de varias personas que se ordena alfabéticamente al inserte el valor y cambiar de celda en la columna 11, a más de eso la columna 2 cambia a mayúsculas cualquier texto, lo primero esta es mi línea de código en la hoja 1:...

Es de la siguiente manera: Creamos un modulo: Sub ordenar() Dim RangoDatos As Range Dim CampOrden As Range Dim UltimaFila As Long UltimaFila = Sheets("Nombre de la hoja").Range("M" & Rows.Count).End(xlUp).Row Set RangoDatos = Range("M8:aqui hasta...