Hhi,
With this code you should not get a "Mismatch". You may need to change the columns that you are looking at.
Code:
Sub Hide_rows()
Dim LastRow As Long
Dim Rng As Range
LastRow = Range("A65536").End(xlUp).Row '
Set Rng = Range("A2:P" & LastRow) 'change "P" to your last coulum
Application.ScreenUpdating = False
For Each cell In Rng
If cell.Value = "0" Then
cell.EntireRow.Hidden = True
End If
Next cell
Application.ScreenUpdating = True
End Sub