Partager via

ERREUR 1004

Anonyme
2019-07-01T06:35:25+00:00

Bonjour, j'ai un message d'erreur :  erreur 1004, erreur définie par l'application ou par l'objet.

ou bien le message: erreur 1004, la methode select de la classe range a echoué

Cela se produit quand je veux copier puis coller une plage de cellules.

Mon code:

sheets("ayant-droit").activate

range("A2:K100").select    (c'est à cette ligne que ça bloque)

selection.copy

sheets("copie").activate

range("A1").select

activesheet.paste

Pourtant ce type de code fonctionne sans problème dans d'autres parties de l'application et également dans pas mal d'applications similaires. Quelle est la solution. Merci au(x) contributeur(s)

J'utilise Win7 avec Office 2007 et j'enregistre sous excel 97/2003

Microsoft 365 et Office | Excel | Pour la maison | Windows

Question verrouillée. Cette question a été migrée à partir de la Communauté Support Microsoft. Vous pouvez voter pour indiquer si elle est utile, mais vous ne pouvez pas ajouter de commentaires ou de réponses ni suivre la question.

0 commentaires Aucun commentaire

Réponse acceptée par l’auteur de la question

  1. DanielCo 107.7K Points de réputation
    2019-07-01T12:43:32+00:00

    C'est quelque chose qui en a fait transpirer plus d'un (dont moi). Ca doit être lié au format .xls. Quand tu mets :

    Range("A2:K100").Select

    La feuille à laquelle appartient la plage n'est pas la feuille active, mais celle dans laquelle se trouve le bouton qui a lancé la macro. Mets :

    Sheets("ayant-droit").Range("A2:K100").Select

    De même, 3 lignes en dessous, mets :

    Sheets("copie").Range("A1").Select

    Je n'ai pas regardé plus loin, mais vérifie si tu n'as pas le même problème.

    Cordialement.

    Daniel

    Cette réponse a-t-elle été utile ?

    1 personne a trouvé cette réponse utile.
    0 commentaires Aucun commentaire

3 réponses supplémentaires

  1. Anonyme
    2019-07-02T08:01:05+00:00

    Bonjour Daniel, modifier la syntaxe n'a pas résolu l'erreur. Mais j'ai trouvé la solution: j'ai crée un nouveau module ( appelé ayantdroit) et j'ai placé dedans  la procédure. Et bingo, plus de problème

    Merci  quand même pour ta contribution, bonne journée, jl

    Cette réponse a-t-elle été utile ?

    2 personnes ont trouvé cette réponse utile.
    0 commentaires Aucun commentaire
  2. Anonyme
    2019-07-01T11:15:26+00:00

    Bonjour Daniel, l'erreur se produit quand on clique sur le bouton "nouvelle inscription" sur feuille "accueil". Quand on repond "oui" à la boite de dialogue la procédure devrait copier une plage de cellules de la feuille "ayant-droit" et la coller sur la feuille "copie". Merci pour ton aide, bonne journée,  JL

    https://we.tl/t-pA93iPzMqZ

    Cette réponse a-t-elle été utile ?

    0 commentaires Aucun commentaire
  3. DanielCo 107.7K Points de réputation
    2019-07-01T09:44:14+00:00

    Bonjour,

    C'est curieux, en effet. Est-ce que tu peux mettre ton classeur, sans données, sur OneDrive, DropBox, CJoint.com, mon-partage.fr ou sur un autre site de partage et poster le lien correspondant ?

    Cordialement.

    Daniel

    Cette réponse a-t-elle été utile ?

    0 commentaires Aucun commentaire