Haber si alguien me puede ayudar.

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.

Hola Hector.

Tengo un problema con la macro que me envias, me da el siguiente error
"no se puede obtener la propiedad autofilter de la clase range.

Gracias.

hola, frank ?

Tengo un problema con la macro que me envias, me da el siguiente error
"no se puede obtener la propiedad autofilter de la clase range.

[pregunta]:
que sentido tiene... 'probar' una macro... que aplica un autofiltro... -> sobre una columna 'vacia' ?

comentas [si hubiera] algun detalle adicional ?
saludos,
hector.

hola [de nuevo], frank ?

Tengo un problema con la macro que me envias, me da el siguiente error
"no se puede obtener la propiedad autofilter de la clase range.

otra 'posibilidad' -?-
si es el caso que la columna 'A' no contiene un rango 'continuo' que inicie en la fila 1 -?-

1) elimina de la macro la instruccion: -> If [a1].AutoFilter Then [a1].AutoFilter

2) sustituye la siguiente instruccion...
de: -> Range([a1], [a65535].End(xlUp)).AutoFilter Field:=1, Criteria1:="*" & Busca & "*"
a: -> Range("a:a").AutoFilter Field:=1, Criteria1:="*" & Busca & "*"

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