Insertar una fila cuando se cumpla una condición

Tengo una hoja de excel con varios nombres de clientes en una columna, requiero hacer una macro o fórmula para que al encontrar dos nombres distintos deje una fila vacía de separación.

Ejemplo:

Juan

Juan

Pedro

María

María

Ana

Solución:

Juan

Juan

(Fila vacía)

Pedro

(Fila vacía)

María

María

(Fila vacía)

Ana

1 respuesta

Respuesta
1

H o  l a:

Te anexo la macro, cambia en la macro la letra "A" por la columna donde tienes los nombres.

Sub InsertarFila()
'Por.Dante Amor
    col = "A"   'columna de nombres
    u = Range(col & Rows.Count).End(xlUp).Row
    ant = Cells(u, col)
    For i = u To 1 Step -1
        If Cells(i, "A") <> ant Then Rows(i + 1).Insert
        ant = Cells(i, "A")
    Next
    MsgBox "fin"
End Sub


' : )
'S aludos. Dante Amor. Recuerda valorar la respuesta. G racias
' : )

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas