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 :

Set Chart => Application-defined or object-defined error


Sujet :

Macros et VBA Excel

  1. #1
    Membre à l'essai
    Homme Profil pro
    Analyse système
    Inscrit en
    Avril 2016
    Messages
    5
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 43
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Analyse système
    Secteur : High Tech - Multimédia et Internet

    Informations forums :
    Inscription : Avril 2016
    Messages : 5
    Par défaut Set Chart => Application-defined or object-defined error
    Bonjour à tous!

    Premier sujet après avoir depuis pas mal de temps consulté ces forums et j'ouvre cette discussion afin de vous demander un peu d'aide car j'arrive au bout des possibilités...
    J'ai un problème sur un ordinateur en particulier (et seulement celui-ci) lorsque je lance la macro suivante:

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    Sub Test()
    Dim cht As ChartObject
     
    Set cht = ThisWorkbook.Worksheets(1).ChartObjects.Add(Left:=100, Width:=100, Top:=100, Height:=100)
     
    End Sub
    Je ne peux pas faire plus simple comme code :/
    Et je reçois pourtant systématiquement la Run Time Error 1004: Application-defined or object-defined error - cht = Nothing

    Point interessant: ce problème ne se produit pas sur un autre ordinateur avec mon compte windows, ni sur mon ordinateur lorsque quelqu'un d'autre se log avec son compte windows...
    Pouvez-vous m'éclairer?

    Windows 10
    Excel 2016 / Office 365*
    References: Visual Basic / Excel 2016 Object Library / OLE Automation / Office 2016 Object Library



    D'avance merci!

  2. #2
    Expert confirmé

    Homme Profil pro
    Curieux
    Inscrit en
    Juillet 2012
    Messages
    5 169
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Curieux
    Secteur : Arts - Culture

    Informations forums :
    Inscription : Juillet 2012
    Messages : 5 169
    Billets dans le blog
    5
    Par défaut
    Bonjour,

    et en déclarant cht en type Object, ça ne passe toujours pas ?

    Si ça passe, ça veut dire qu'il y a un problème de librairie sur le PC incriminé
    Si ça passe pas ... on verra après avoir testé le type Object

  3. #3
    Membre à l'essai
    Homme Profil pro
    Analyse système
    Inscrit en
    Avril 2016
    Messages
    5
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 43
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Analyse système
    Secteur : High Tech - Multimédia et Internet

    Informations forums :
    Inscription : Avril 2016
    Messages : 5
    Par défaut
    Bonjour joe.levrai,

    Merci pour cette réactivité

    Renvoie la même erreur - cht = nothing :/

  4. #4
    Expert confirmé

    Homme Profil pro
    Curieux
    Inscrit en
    Juillet 2012
    Messages
    5 169
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Curieux
    Secteur : Arts - Culture

    Informations forums :
    Inscription : Juillet 2012
    Messages : 5 169
    Billets dans le blog
    5
    Par défaut
    Et "Dim cht" sans fournir le type ... histoire de tester le Variant ?

  5. #5
    Membre à l'essai
    Homme Profil pro
    Analyse système
    Inscrit en
    Avril 2016
    Messages
    5
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 43
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Analyse système
    Secteur : High Tech - Multimédia et Internet

    Informations forums :
    Inscription : Avril 2016
    Messages : 5
    Par défaut
    aussi mais cht = empty maintenant

  6. #6
    Membre à l'essai
    Homme Profil pro
    Analyse système
    Inscrit en
    Avril 2016
    Messages
    5
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 43
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Analyse système
    Secteur : High Tech - Multimédia et Internet

    Informations forums :
    Inscription : Avril 2016
    Messages : 5
    Par défaut
    Bonjour,

    D'autres idées?

    Merci pour vos réponses.

  7. #7
    Expert confirmé

    Homme Profil pro
    Curieux
    Inscrit en
    Juillet 2012
    Messages
    5 169
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Curieux
    Secteur : Arts - Culture

    Informations forums :
    Inscription : Juillet 2012
    Messages : 5 169
    Billets dans le blog
    5
    Par défaut
    Bonjour,

    autre test :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    Sub Test()
    Dim cht As Object
    ThisWorkbook.Worksheets(1).ChartObjects.Add(Left:=100, Width:=100, Top:=100, Height:=100).Select
    Set cht = Selection
    MsgBox cht.Name
    End Sub
    lance la procédure en pas à pas afin de dérouler la macro ligne par ligne
    si ça plante, indique sur quelle ligne ça plante.
    Si ça ne plante pas, tu obtiens une boite de dialogue indiquant le nom de la forme qui vient d'être crées.


    Par ailleurs, tes tests préliminaires ne sont pas complets :

    1) Toi sur ton poste = OK
    2) Un autre sur ton poste = OK
    3) Toi sur un autre poste = OK

    Mais du coup, aucun test de ce genre :

    1) Toi sur le poste incriminé = ?
    2) Un autre utilisateur sur le poste incriminé = ?
    3) L'utilisateur habituel du poste incriminé = KO


    Il semblerait qu'une réparation de la suite Office soit également à envisager (ou une réinstallation)

  8. #8
    Membre à l'essai
    Homme Profil pro
    Analyse système
    Inscrit en
    Avril 2016
    Messages
    5
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 43
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Analyse système
    Secteur : High Tech - Multimédia et Internet

    Informations forums :
    Inscription : Avril 2016
    Messages : 5
    Par défaut
    Bonjour,

    Merci pour la réponse
    Le code renvoie toujours la même erreur Run-time '1004' Application-defined or object-defined error sur la ligne contenant ChartObjects.Add :/

    En ce qui concerne les test effectués, le poste incriminé est en fait le mien
    Donc ça donne:

    1) Moi sur mon poste et mon windows login = Error
    2) Un ami sur mon poste et son windows login = OK
    3) Moi sur un autre poste et mon windows login = OK

    A noter, j'ai aussi tenté:
    a/ Une réinstallation complète de la suite Office 365 après avoir constaté que la réparation ne changeait rien
    b/ Supprimer les imprimantes du gestionnaire de periph (tips récupéré sur un autre forum)
    c/ Jouer avec les clés registre windows en suivant ces indications (depuis rétabli les valeurs par défaut): https://support.microsoft.com/en-us/kb/215573

    Merci pour ta persévérance

Discussions similaires

  1. [XL-2010] Run time error 1004 Application defined or object defined
    Par AmbreM dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 19/09/2013, 18h00
  2. Application-defined or object-defined error
    Par Vivi127 dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 15/09/2011, 12h42
  3. Debug fonctionne après erreur "application defined or object defined"
    Par Isabelle86 dans le forum Macros et VBA Excel
    Réponses: 3
    Dernier message: 25/07/2011, 14h47
  4. Réponses: 1
    Dernier message: 20/02/2010, 08h03
  5. [XL-2003] Error 1004 - Application-defined or object-defined
    Par DaRisK dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 23/05/2009, 19h49

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