Tutorial de Excel - Macro de Búsqueda y Eliminación de datos...

                         
                         El código utilizado en el video:


Buscardato = InputBox("Deme el dato")
If Buscardato <> "" Then
 Range("A1").Select
    Cells.Find(What:=Buscardato, After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _
        xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False _
        , SearchFormat:=False).Activate
    Selection.EntireRow.Delete
    Range("A1").Select
 End If



0 <--- CLIC AQUI PARA COMENTAR :

Publicar un comentario

Gracias por tus aportaciones!

 
FACEBOOK!! YOUTUBE! TWITTER! FLICKR!