PasteSpecial Format:="Image (métafichier amélioré)" Fermé

Question

Bonjour, 

j'ai le code ci-dessous qui plante seulement quelques fois plage_legende est pourtant toujours la même.
Je ne comprends vraiment pas pourquoi.

Range(plage_legende_eg).Select
        Selection.CopyPicture Appearance:=xlPrinter, Format:=xlPicture
        Range("N78").Select
        ActiveSheet.PasteSpecial Format:="Image (métafichier amélioré)", Link:= _
        False, DisplayAsIcon:=False

Configuration: Windows / Chrome 61.0.3163.100

xicamaria · Answer

J'ai envoyé le message sans vouloir, c'est juste pour ajouter :
est-ce que quelqu'u peut m'aider et biensûr pour remercier

xicamaria · Answer

et pourtant si j'arrête la procédure et que je fait le collage spécia manuellement ça marche : étonnant, non ?

yg_be · Answer

cela plante avec un message d'erreur?  lequel, sur quelle ligne?
 Range(plage_legende_eg).CopyPicture Appearance:=xlPrinter, Format:=xlPicture 
Range("N78").Select 
ActiveSheet.PasteSpecial Format:="Image (métafichier amélioré)", Link:= _ 
False, DisplayAsIcon:=False

PasteSpecial Format:="Image (métafichier amélioré)"

3 réponses

Discussions similaires