IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

[VBA-E] Run-time error 1004, pourquoi ?


Sujet :

Macros et VBA Excel

  1. #1
    Membre du Club
    Profil pro
    Inscrit en
    Mai 2006
    Messages
    61
    Détails du profil
    Informations personnelles :
    Localisation : Belgique

    Informations forums :
    Inscription : Mai 2006
    Messages : 61
    Points : 40
    Points
    40
    Par défaut [VBA-E] Run-time error 1004, pourquoi ?
    lors de la selection mise en rouge dans le code suivant, le message d'erreur suivant s'affiche:

    Run-Time error '1004' Application-defined or object-defined error

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    Windows("Model_SalesProdCcOb_2007.xls").Activate
            
            Sheets("CC").Select
            
            Sheets("CC").Columns("A:A").Select
            Selection.Find(What:=CountryName, After:=ActiveCell, kIn:=xlFormulas, 
                 LookAt :=xlWhole, SearchOrder:=xlByRows,  
                 SearchDirection:=xlNext, MatchCase:= True).Activate
            ActiveCell.Offset(0, 5).Range("A1:AL111").Select
            Selection.Copy
            
            ActiveWindow.ActivateNext
            
            Sheets("CC").Select
            
            Range("F698").Select
            Selection.PasteSpecial Paste:=xlValues, operation:=xlNone,   
                    skipblanks:= True, Transpose:=False
            Application.CutCopyMode = False
    la feuille CC est pourtant bien selectionnée... je ne comprend pas...

    surtout que je fais exactement les mêmes opérations un peu plutot dans la macro mais avec d'autres ranges et feuille...

    Qqn a-t-il une idée ?

    Merci c'est assez urgent.....


    Capsule

  2. #2
    Expert éminent sénior


    Profil pro
    Inscrit en
    Juin 2003
    Messages
    14 008
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juin 2003
    Messages : 14 008
    Points : 20 040
    Points
    20 040
    Par défaut
    remplace le sheets..select par un Activate...

  3. #3
    Membre du Club
    Profil pro
    Inscrit en
    Mai 2006
    Messages
    61
    Détails du profil
    Informations personnelles :
    Localisation : Belgique

    Informations forums :
    Inscription : Mai 2006
    Messages : 61
    Points : 40
    Points
    40
    Par défaut
    Citation Envoyé par bbil
    remplace le sheets..select par un Activate...

    Ca ne marche pas j'ai la même erreur....


  4. #4
    Expert éminent sénior


    Profil pro
    Inscrit en
    Juin 2003
    Messages
    14 008
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juin 2003
    Messages : 14 008
    Points : 20 040
    Points
    20 040
    Par défaut
    ..? sheets.Activate..?

    enléve cela :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
     
     ActiveWindow.ActivateNext

  5. #5
    Membre du Club
    Profil pro
    Inscrit en
    Mai 2006
    Messages
    61
    Détails du profil
    Informations personnelles :
    Localisation : Belgique

    Informations forums :
    Inscription : Mai 2006
    Messages : 61
    Points : 40
    Points
    40
    Par défaut
    Citation Envoyé par bbil
    ..? sheets.Activate..?

    enléve cela :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
     
     ActiveWindow.ActivateNext


    non, ca ne fonctionne pas non plus.... tjs la même erreur...

  6. #6
    Modérateur
    Avatar de AlainTech
    Homme Profil pro
    Consultant informatique
    Inscrit en
    Mai 2005
    Messages
    4 235
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 70
    Localisation : Belgique

    Informations professionnelles :
    Activité : Consultant informatique
    Secteur : Finance

    Informations forums :
    Inscription : Mai 2005
    Messages : 4 235
    Points : 24 327
    Points
    24 327
    Par défaut
    Je parie que ton code est dans un module de feuille...

    Déplace-le dans un module général, je pense que ça ira mieux.
    N'oubliez pas de cliquer sur quand vous avez obtenu ou trouvé vous-même la réponse à votre question.
    Si vous trouvez seul, pensez à poster votre solution. Elle peut servir à d'autres!
    Pensez aussi à voter pour les réponses qui vous ont aidés.
    ------------
    Je dois beaucoup de mes connaissances à mes erreurs!

  7. #7
    Membre du Club
    Profil pro
    Inscrit en
    Mai 2006
    Messages
    61
    Détails du profil
    Informations personnelles :
    Localisation : Belgique

    Informations forums :
    Inscription : Mai 2006
    Messages : 61
    Points : 40
    Points
    40
    Par défaut
    Citation Envoyé par AlainTech
    Je parie que ton code est dans un module de feuille...

    Déplace-le dans un module général, je pense que ça ira mieux.

    ok ca marche... merci

    quelle est la différence entre le fait que la macro se trouve dans une feuille et dans un module ? qu'est-ce que ca change ?

    merci

  8. #8
    Inactif  
    Avatar de ouskel'n'or
    Profil pro
    Inscrit en
    Février 2005
    Messages
    12 464
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2005
    Messages : 12 464
    Points : 15 543
    Points
    15 543
    Par défaut
    Cest pas pareil !

  9. #9
    Membre du Club
    Profil pro
    Inscrit en
    Mai 2006
    Messages
    61
    Détails du profil
    Informations personnelles :
    Localisation : Belgique

    Informations forums :
    Inscription : Mai 2006
    Messages : 61
    Points : 40
    Points
    40
    Par défaut
    Citation Envoyé par ouskel'n'or
    Cest pas pareil !

    Merci....

    ca m'avance effectivement bcp comme réponse....



  10. #10
    Modérateur
    Avatar de AlainTech
    Homme Profil pro
    Consultant informatique
    Inscrit en
    Mai 2005
    Messages
    4 235
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 70
    Localisation : Belgique

    Informations professionnelles :
    Activité : Consultant informatique
    Secteur : Finance

    Informations forums :
    Inscription : Mai 2005
    Messages : 4 235
    Points : 24 327
    Points
    24 327
    Par défaut
    Je n'ai pas analysé en profondeur la raison de ce comportement mais je l'ai constaté à maintes reprises.

    Une sélection dans une feuille à partir du code contenu dans une autre feuille ne marche pas.

    De toute manière, ceci confirme une bonne habitude à prendre dès le début:
    Ne mettre dans le code de feuille que les procédures événementielles de la feuille concernée et créer d'autres procédures dans un ou des modules standard pour tout ce qui est traitement.
    N'oubliez pas de cliquer sur quand vous avez obtenu ou trouvé vous-même la réponse à votre question.
    Si vous trouvez seul, pensez à poster votre solution. Elle peut servir à d'autres!
    Pensez aussi à voter pour les réponses qui vous ont aidés.
    ------------
    Je dois beaucoup de mes connaissances à mes erreurs!

  11. #11
    Membre du Club
    Profil pro
    Inscrit en
    Mai 2006
    Messages
    61
    Détails du profil
    Informations personnelles :
    Localisation : Belgique

    Informations forums :
    Inscription : Mai 2006
    Messages : 61
    Points : 40
    Points
    40
    Par défaut
    Citation Envoyé par AlainTech
    Je n'ai pas analysé en profondeur la raison de ce comportement mais je l'ai constaté à maintes reprises.

    Une sélection dans une feuille à partir du code contenu dans une autre feuille ne marche pas.

    De toute manière, ceci confirme une bonne habitude à prendre dès le début:
    Ne mettre dans le code de feuille que les procédures événementielles de la feuille concernée et créer d'autres procédures dans un ou des modules standard pour tout ce qui est traitement.

    je vois, encore un des mystères d'excel....

    Par contre, ma macro est une macro privée liée à un boutton qui se trouve dans une feuille...

    pas de problème à la mettre dans un module ?

    (ca a l'air de fonctionner mais comme cette macro se trouve dans une 30aine de fichier, je voudrais être sure avant de tout changer...)


  12. #12
    Expert éminent sénior


    Profil pro
    Inscrit en
    Juin 2003
    Messages
    14 008
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juin 2003
    Messages : 14 008
    Points : 20 040
    Points
    20 040
    Par défaut
    juste une chose peu tu nous dire ce qu'est censé faire ta macro...? sur combien de feuilles agit'elle..?

  13. #13
    Expert éminent
    Avatar de ThierryAIM
    Homme Profil pro
    Inscrit en
    Septembre 2002
    Messages
    3 673
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 61
    Localisation : France, Rhône (Rhône Alpes)

    Informations professionnelles :
    Secteur : Industrie

    Informations forums :
    Inscription : Septembre 2002
    Messages : 3 673
    Points : 8 524
    Points
    8 524
    Par défaut
    Citation Envoyé par Capsule
    quelle est la différence entre le fait que la macro se trouve dans une feuille et dans un module ? qu'est-ce que ca change ?

    merci
    Simplement le fait que le code contenu dans une feuille n'est pas global à toute l'application, contrairement à un module, lorsque les Sub ou Function sont Public
    Vous vous posez une question, la réponse est peut-être ici :
    Toutes les FAQs VB
    Les Cours et Tutoriels VB6/VBScript
    Les Sources VB6


    Je ne réponds pas aux questions techniques par MP. Utilisez les forums. Merci de votre compréhension

  14. #14
    Membre du Club
    Profil pro
    Inscrit en
    Mai 2006
    Messages
    61
    Détails du profil
    Informations personnelles :
    Localisation : Belgique

    Informations forums :
    Inscription : Mai 2006
    Messages : 61
    Points : 40
    Points
    40
    Par défaut
    ma macro est liée à un boutton se trouvant dans une feuille d'un classeur contenant 3 feuilles.

    elle ouvre un second classeur qui comporte 4 feuilles cherche la zone qu'elle doit copier dans la feuille ad-hoc

    va dans le premier classeur et colle les valeurs

    retourne dans le second classeur et ainsi de suite....

    la zone selectionnée change en fonction du pays qui correspond au fichier dans lequel on exécute la macro


    je sais pas si c'est très clair comme explication mais en gros, c'est ca.

    Sinon, tous ces fichiers sont utilisés par une multitude de personnes dans différents départements de la boite....



  15. #15
    Membre du Club
    Profil pro
    Inscrit en
    Mai 2006
    Messages
    61
    Détails du profil
    Informations personnelles :
    Localisation : Belgique

    Informations forums :
    Inscription : Mai 2006
    Messages : 61
    Points : 40
    Points
    40
    Par défaut
    Citation Envoyé par ThierryAIM
    Simplement le fait que le code contenu dans une feuille n'est pas global à toute l'application, contrairement à un module, lorsque les Sub ou Function sont Public

    donc dans mon cas, ca ne devrait pas poser de problème sauf si il y avait une raison spéciale pour laquelle mon prédecesseur avait mis cette macro dans la feuille et non dans un module (ce qui n'était pas dans ses habitudes...)

    en tout les cas, j'ai fait plusieurs test et ca a l'air de fonctionner correctement.....



  16. #16
    Membre du Club
    Profil pro
    Inscrit en
    Mai 2006
    Messages
    61
    Détails du profil
    Informations personnelles :
    Localisation : Belgique

    Informations forums :
    Inscription : Mai 2006
    Messages : 61
    Points : 40
    Points
    40
    Par défaut
    je viens de lire sur un autre forum que le problème pourrait être lié au fait que cette macro est liée a un command button click et que la propiété takefocuonclick du bouton = true...

    vous en pensez quoi ?

    est-ce une possibilité ?

  17. #17
    Membre du Club
    Profil pro
    Inscrit en
    Mai 2006
    Messages
    61
    Détails du profil
    Informations personnelles :
    Localisation : Belgique

    Informations forums :
    Inscription : Mai 2006
    Messages : 61
    Points : 40
    Points
    40
    Par défaut
    oops, en mettant le code dans un module au lieu de la feuille, ca marche mais par contre, quand je click sur le bouton qui lancait la macro, celle-ci ne se lance plus...

    quelle est la solution ?

    merci

  18. #18
    Modérateur
    Avatar de AlainTech
    Homme Profil pro
    Consultant informatique
    Inscrit en
    Mai 2005
    Messages
    4 235
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 70
    Localisation : Belgique

    Informations professionnelles :
    Activité : Consultant informatique
    Secteur : Finance

    Informations forums :
    Inscription : Mai 2005
    Messages : 4 235
    Points : 24 327
    Points
    24 327
    Par défaut
    Tu as sauté la dernière partie de mon message.

    Citation Envoyé par AlainTech
    De toute manière, ceci confirme une bonne habitude à prendre dès le début:
    Ne mettre dans le code de feuille que les procédures événementielles de la feuille concernée et créer d'autres procédures dans un ou des modules standard pour tout ce qui est traitement.
    Il faut, évidemment, laisser la procédure événementielle dans la feuille.

    Pas à pas, ça donne ceci:
    Nomme ta procédure (celle qui est dans le module) Sub Copie
    Recrée la procédure événementielle comme tu l'avais fait la première fois (je ne peux pas te donner la façon de faire car elle peut différer en fonction du type de bouton que tu as utilisé)
    A l'intérieur de cette procédure, tu tapes simplement copie

    Autrement dit, c'est la procédure événementielle (celle qui est liée à l'événement Click sur le bouton) qui va appeler la procédure Copie.

    Pratiquement, il faudrait toujours travailler de cette manière.
    N'oubliez pas de cliquer sur quand vous avez obtenu ou trouvé vous-même la réponse à votre question.
    Si vous trouvez seul, pensez à poster votre solution. Elle peut servir à d'autres!
    Pensez aussi à voter pour les réponses qui vous ont aidés.
    ------------
    Je dois beaucoup de mes connaissances à mes erreurs!

  19. #19
    Membre du Club
    Profil pro
    Inscrit en
    Mai 2006
    Messages
    61
    Détails du profil
    Informations personnelles :
    Localisation : Belgique

    Informations forums :
    Inscription : Mai 2006
    Messages : 61
    Points : 40
    Points
    40
    Par défaut
    Pourquoi est-ce que je n'y ai pas pensé plus tot.....





    avec un peu de chance je pourrais quitter le bureau dans pas trop longtemps.....



+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Run-time error '1004'
    Par byran444 dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 10/12/2012, 11h19
  2. Run time error 1004 - Select method class failed
    Par fhuyet dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 08/07/2008, 11h18
  3. Excel 2003 - Run-time error '1004'
    Par GuyRo dans le forum Macros et VBA Excel
    Réponses: 5
    Dernier message: 08/05/2008, 10h20
  4. [VBA-E] - run-time error "Type mismatch"
    Par Chewi dans le forum Macros et VBA Excel
    Réponses: 10
    Dernier message: 11/02/2007, 18h44
  5. Excel - macro (format conditionnel - run-time error 1004)
    Par Chewi dans le forum Macros et VBA Excel
    Réponses: 5
    Dernier message: 01/09/2006, 19h18

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo