Borrar filas de una tabla, cuando el texto inluye cierta palabra en ellos.

Necesito su apoyo. Tengo una tabla con ciertos datos y en la columna " G " tengo el siguiente texto " projectsites/Ayatsil-C/DOCUMENTATION INTERNAL/Engineering Services/Lofting/G_Metallic Structures/1_Structural/801 JACKET VERTICAL FRAMING ELEVATION AT ROW A/Obsoletes " necesito eliminar, todas y cada una de las filas que contengan "" A/Obsoletes "" y por consecuente, se queden las que no lo incluyan.

1 respuesta

Respuesta
1

H o l a

Te anexo la macro

Sub BorrarFila()
'Por.Dante Amor
    Application.ScreenUpdating = False
    For i = Range("G" & Rows.Count).End(xlUp).Row To 1 Step -1
        If InStr(1, UCase(Cells(i, "G")), UCase("A/Obsoletes")) > 0 Then
            Rows(i).Delete
        End If
    Next
    Application.ScreenUpdating = True
    MsgBox "Terminado"
End Sub

Sigue las Instrucciones para ejecutar la macro

  1. Abre tu archivo de excel
  2. Para abrir Vba-macros y poder pegar la macro, Presiona Alt + F11
  3. En el menú elige Insertar / Módulo
  4. En el panel del lado derecho copia la macro
  5. Para ejecutarla presiona F5

S a l u d o s . D a n t e A m o r. Recuerda valorar la respuesta.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas