Bonjour,
 
j'ai besoin de copier des données de Excel vers un document Word. Je suis bloquée depuis quelques jours sur un problème mais je ne comprends pas ce que c'est. Un coup l'exécution fonctionne, la fois d'après ça renvoie une erreur. Voici l'erreur renvoyée:
 
"Cette méthode ou propriété n'est pas disponible car le presse papiers est vide ou non valide"
 
Or voici mon code:
 
Sheets("Présentation Word" ).Activate
plage.Copy
appword.Selection.PasteSpecial (xlPasteFormats)
Application.CutCopyMode = False
 
et si je demande à debuger il me renvoie l'erreur sur l'instruction PasteSpecial
 
J'ai pensé qu'il avait un problème pour copier les données demandées mais c'est pas le cas parce qu'à l'aide de ce code je vois bien qu'il y a des données dans le presse papiers:
 
Select Case Application.CutCopyMode
    Case Is = False
        MsgBox "Not in Cut or Copy mode"
    Case Is = xlCopy
        MsgBox "In Copy mode"
    Case Is = xlCut
        MsgBox "In Cut mode"
End Select
 
Cette exécution m'affiche "In copy mode" juste avant l'erreur
 
Quelqu'un peut-il m'aider? Est ce que vous avez déjà eu une erreur de ce type?
Ce que je ne comprends pas c'est que ça marche de temps en temps et d'autres fois ça ne marche pas...
 
Merci de votre aide
 
Mimi