Discussion :

[Larion]

Bonjour,

Ma fonction : créer une image à partir d'un groupe de cellule.
Mon problème : lorsque que je fais la manipulation à la main, la qualité de l'image est normale, mais la macro (de la même manipulation) me donne une image dégradée.
Pourquoi, et comment résoudre ce problème.
Merci de votre aide.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
    Range("A1:M12").Select
    Selection.CopyPicture Appearance:=xlScreen, Format:=xlBitmap
    Sheets("Feuil1").Select
    ActiveSheet.Paste

Ci-joint une capture d'écran des 2 résultats obtenus :
- en haut, obtenu manuellement
- en bas, par macro