Zoom sur impression en vba

[glm]

Bonsoir le forum,

je cherche à imprimer une plage de cellules
ex:ActiveSheet.PageSetup.PrintArea = '$A$1:$AI$28'
en prenant toute la feuille(en ayant définit les marges auparavant)
Il y a bien la fonction zoom mais elle ne satisfait pas totalement.
Si vous avez des suggestions
Merci
A+