Impression ou non des zéros

Bonjour,

J'ai une feuille Excel avec des zéros qui ne sont pas affichés puisque j'ai décoché l'option "Afficher un zéro dans les cellules qui ont une valeur nulle". C'est parfait.

Toutefois, lorsque j'exécute ma macro d'impression de mon rapport, je veux que les zéros soient affichés. Une fois, imprimé, je veux que les zéros ne s'affichent pas.

Voici ma macro:

Sub Impression()
ActiveWindow.DisplayZeros = True ' J'affiche les zéros temporairement
ActiveSheet.PageSetup.PrintArea = "Rapport"
ActiveWindow.DisplayZeros = False ' Je "désaffiche" les zéros
MsgBox ("Rapport imprimé")
End Sub

Dans l'aperçu avant l'impression, les zéros ne s'affichent pas.

Qu'est-ce que je fais de pas correct?

Merci

Bonjour,

Pour moi il ne manque que la commande d'impression . Printout. Votre macro fonctionne très bien.

Sub Impression()
    ActiveWindow.DisplayZeros = True ' J'affiche les zéros temporairement
    ActiveSheet.PageSetup.PrintArea = "Rapport"
    ActiveSheet.PrintOut
    ActiveWindow.DisplayZeros = False ' Je "désaffiche" les zéros
    MsgBox ("Rapport imprimé")
End Sub