Copypicture, paste erreur 1004

Sormick Messages postés 146 Date d'inscription   Statut Membre Dernière intervention   -  
yg_be Messages postés 23541 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,

J'utilise la fonction Copypicture pour créer une image à partir d'un range.

Puis je colle cette image sur une autre feuille mais une fois sur quatre j'ai cette erreur qui apparait (1004)
Est t"il possible d'éviter un copier coller avec copypicture?
Si ce n'est pas possible il y a t'il un moyen d'éviter l'erreur sur le coller (1004)?

Voici comment j'ai fait cette macro: 


 Range("A3:H64")..CopyPicture _
    Appearance:=xlScreen, _
    Format:=xlPicture
  Sheets("jpg").range("a1).activate
activesheet.Paste

1 réponse

Réponse 1 / 1
yg_be Messages postés 23541 Date d'inscription   Statut Contributeur Dernière intervention   Ambassadeur 1 584
 
bonjour, je vois 2 erreurs dans ton code: es-tu certain de l'avoir bien copié?
0
sormick
 
Je pense l'avoir bien copié. Oui.
0
yg_be Messages postés 23541 Date d'inscription   Statut Contributeur Dernière intervention   1 584 > sormick
 
et ainsi? 
Range("A3:H64").CopyPicture _
    Appearance:=xlScreen, _
    Format:=xlPicture
Sheets("jpg").range("a1").Paste
0