Respuesta de blackdog2003
1
Esta macro funciona tal y como lo quieres, espero que te sea de gran utilidad, cualquier duda me puedes preguntar nuevamente.
Saludos,
Blak Dog
Sub borrarfilas()
For fila = 1 To 65536
If Cells(fila, 4).Value = "0" Then
Rows(fila).Delete
End If
Next fila
End Sub
Saludos,
Blak Dog
Sub borrarfilas()
For fila = 1 To 65536
If Cells(fila, 4).Value = "0" Then
Rows(fila).Delete
End If
Next fila
End Sub
Hola que pena no haber dado las gracias antes de verdad que las respuestas fueron de valiosa ayuda ya que el trabajo que estaba haciendo me tomaba mucho tiempo y ya me esta sobrando tiempo para hacer muchas más cosas
