macro pour impression 2ème problème

[alain85]

Bjr merci alain51 ta macro fonctionne mais au lieu de supprimer les lignes
vierges comment faire pour les masquer simplement.
Merci si quelqu'un à une solution

(mon premier problème :peut-on avec une macro ne pas imprimé les lignes vierges, exemple
j'ai un tableau lignes 5 à 10, lignes 6 à 14 vierges, et 1 tableau ligne 15 à 20, je voudrais qu'a l'impression les 2 tableaux se touchent.)

[nouv]

slt,
slt,
modifier la ligne if

If Application.CountA(Rows(r)) = 0 Then Rows(r).RowHeight = 0
cela met la hauteur de ligne à zéro

très bien la macro, merci alain51, je la garde !
><>