Sub Masque()
Dim Cell As Range
For Each Cell In Range('c1:c10') 'Le total des cellules se fait en C
If Cell.Value = '0' Then Cell.Value = ''
Next Cell
Columns(3).SpecialCells(xlCellTypeBlanks).EntireRow.Hidden = True
'3 en référence à la colonne C
End Sub