Excel - Macros

Estimad@s,

Me gustaria que me brindaran la ayuda con una macro, necesito que la misma me elimine de un formato todo lo que contenga celdas en blanco y que contenga ceros!

Saludos!

tenés algo hecho o querés que te hagan todo el código?
por otro lado no se entiende del todo el problema a resolver...

Saludos, desde Baires, JuanC

Si me puedes ayudar con el codigo seria mucho mejor.

Saludos

por favor explica mejor el problema o enviame detalles (y archivo) a mi
correo...
[juanc2942[@]gmail.com]

Saludos, desde Baires, JuanC

Le mostrare un ejemplo de los que hago

00000
00000
00000 Este es un formato generico que tengo, cada celda contiene ceros
00000 Ha este formato le ingreso cantidades pero hay veces que no se llenan
--------- todas las lineas entonces hay lineas que quedan con ceros
00000 total

12345
12345
00000 Asi quedaria el formato si me quedara algunas lineas por llenar
00000 Nota: no siempre quedara asi hay veces que se llenan todas las lineas
---------
12345 Total

Lo que necesito es que la macro me borre las lineas que contengan ceros.

Para que me genere un formato asi:

12345
12345
--------
12345 Total

te dejo un código para que lo adaptes a tu gusto... (no lo hice yo)

Sub DeleteIf()
On Error Resume Next
x = ActiveCell.Value '//Aquí debería ir 00000
Set region = ActiveCell.CurrentRegion
Set col = ActiveCell.EntireColumn
Set checkrange = Intersect(region, col)

For Each cell In checkrange
If cell.Value = x Then
If n = 0 Then
Set delrange = cell.EntireRow
n = 1
Else
Set delrange = Union(delrange, cell.EntireRow)
End If
End If
Next
delrange.Delete
End Sub

Saludos, desde Baires, JuanC