safua56

José Saúl Méndez Alonso respondió: Puedes usar la siguiente MACRO Sub Separador() Dim nFila As Integer Dim nTotalFilas As Integer Dim sCelda As String Range("A1").Select 'Suponiendo que aquí inicie la lista Range(Selection, Selection.End(xlDown)).Select 'Seleccionamos toda la columna...