I have a data with about 20 rows and ten columns in the beginning of the
month and I will finish with about 100 rows, but some rows only have
zero values I would like to use a VBA statement that would help to clean
only the rows were exist zero or blank values, Can someone help me?

I have this VBA:

Sub Macro()

Sheets("datareq").Select
Range("A8").Select
Selection.CurrentRegion.Select
Dim rng As Range
For Each rng In Selection
If rng.Value = 0 Then
rng.EntireRow.delete = True
End If
Next
End Sub