Haber si alguien me puede ayudar.

06/07/2006 - 13:05 por cabello_frank | Informe spam
Necesito hacer una macro que cuando encuentre una letra (Por ejemlo B)
en la columna A elimine toda la fila (no columna) donde este esa letra.
 

Leer las respuestas

#1 Héctor Miguel
06/07/2006 - 21:17 | Informe spam
hola, frank ?

Necesito hacer una macro que cuando encuentre una letra (Por ejemlo B)
en la columna A elimine toda la fila (no columna) donde este esa letra.



prueba [p.e.] con una macro +/- como la siguiente:
Sub Filtra_y_Elimina()
Dim Busca As String
Busca = "b"
If [a1].AutoFilter Then [a1].AutoFilter
Range([a1], [a65535].End(xlUp)).AutoFilter Field:=1, Criteria1:="*" & Busca & "*"
With ActiveSheet.AutoFilter.Range
If .SpecialCells(xlCellTypeVisible).Count > 1 _
Then .Offset(1).Resize(.Rows.Count - 1).EntireRow.Delete
End With
[a1].AutoFilter
End Sub

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

Preguntas similares