Eliminar un registro de una base

Tengo esta base en excel

Quiero una macros que busque el código y si lo encuentra que limpie o elimine la fila donde se posiciona

1

1 Respuesta

195.010 pts. Los hombres aprenden mientras enseñan.

[Hola 

Prueba con esto


Valora la respuesta para finalizar saludos!

Sub eliminar()
    col = "A" ' columna código
    codigo = "101"
    '
    Set r = Columns(col)
    Set b = r.Find(codigo, lookat:=xlWhole)
    If Not b Is Nothing Then
        'encuentra los datos y limpia la fila
    Rows(b.Row) = ""
    Else
    MsgBox "No existe en la base de datos"
    End If
End Sub

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas