Suppression de cellules qui sont a 0

 bonjour à tous

un tableau 

A B C D E F  H

ligne de 10 à 20 dans A qui sont des nombres

 A      B      C     D    E    F        H
10    42     1    13   25   4         1
11    42     9    34    6   25        3
12    42    46   19  32   25        6
13    42    19   35  15   16        8
14    42    32   43  13   15        4
15    42    46    8    9    15        3
16     0      0     0    0     0         0
17    42    46    7   13    16       8
18    42    9    43   12    16       4
19     0     0     0     0      0        0
20    42    2    19   13   18        4

je veux supprimer B16:H16  qui est a 0

                              B19::H19 qui est à 0

en les remontant au dessus

avec F5 ou Trier, impossible mes cellules n'apparaissent jamais? Pourquoi?

Un VBA?

merci