La méthode 'Paste' de l'objet '_Worksheet' à échoué

[mikael2235]

Bonjour à tous,

J'ai un problème dans l'exécution d'une macro, sur un ordinateur.

Le message est le suivant :

Erreur d'execution '-2147417848 (80010108)'
La méthode 'Paste' de l'objet '_Worksheet' à échoué

Alors que d'un autre ordinateur, cela fonctionnait très bien.

Voici mon code :

'---- Déplace les infos "campagne" + "prod" ----
    Sheets("DatasCB1").Activate
    Range("CG63:CH63").Select
    Application.CutCopyMode = False
    selection.Cut
    Range("CG64").Select
[B]    ActiveSheet.Paste[/B]

J'ai regardé sur le net : certains disent que c'est à cause de la protection de la feuille. J'ai essayé un ActiveSheet.Unprotect, mais c'est idem.

Mes feuilles sont protégées dans Workbook_Open(), avec :

Sheets("DatasCB1").Protect UserInterfaceOnly:=True

Merci pour votre aide. Je suis bloqué...

 

[kjin]

Re : La méthode 'Paste' de l'objet '_Worksheet' à échoué

Bonjour,
On peut faire le tour de toutes les éventualités, mais ça risque de prendre du temps !
Le forum t'offre la possibilité de joindre un fichier, profites en

With Sheets("DatasCB1")
    .Unprotect
    .Range("CG63:CH63").Cut .Range("CG64")
    .Protect
End With

A+
kjin

 

[mikael2235]

Re : La méthode 'Paste' de l'objet '_Worksheet' à échoué

J'ai résolu mon problème en faisant un copier-coller puis en supprimant après mes valeurs CG63:CH63, au lieu de faire un couper-coller.

Et ça fonctionne sans problème.

Mais je n'explique toujours pas pourquoi ce problème !

 

[Pierrot93]

Re : La méthode 'Paste' de l'objet '_Worksheet' à échoué

Bonjour à tous,

peut être ton code placé dans un module de feuille et non dans un module standard... Pour t'en dire plus il faudrait un tout petit fichier reproduisant le problème...

bonne journée
@+

 

[mikael2235]

Re : La méthode 'Paste' de l'objet '_Worksheet' à échoué

Oui Pierrot, je suis d'accord, mais le problème c'est que mon fichier et ma macro sont très long.

Et si je refais un fichier avec le couper-coller uniquement ça marche !

 

[Pierrot93]

Re : La méthode 'Paste' de l'objet '_Worksheet' à échoué

Re,

à part ceci :

peut être ton code placé dans un module de feuille et non dans un module standard

et si les feuilles sont bien déprotégées ou protégée avec l'argument "userinterfaceonly", perso pas d'autre idée...