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 :

erreur 2015 avec fonction Linest VBA


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre habitué
    Femme Profil pro
    Étudiant
    Inscrit en
    Avril 2016
    Messages
    11
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Âge : 32
    Localisation : France, Hauts de Seine (Île de France)

    Informations professionnelles :
    Activité : Étudiant
    Secteur : Finance

    Informations forums :
    Inscription : Avril 2016
    Messages : 11
    Par défaut erreur 2015 avec fonction Linest VBA
    Bonjour,

    Je cherche à utiliser la fonction linest avec un array (Tableau_moyenne) contenant les moyennes de mes observations et uy qui est la Matrice_age pour ensuite les stocker dans un autre tableau.
    Cependant la ligne "vecteur_poly = Application.LinEst(Table, Matrice_age)" me renvoit l'erreur 2015.
    Quelqu'un aurait il une idée pour débloquer le code ?
    Merci d'avance de votre aide !

    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
    20
    21
    22
    23
    24
    25
    26
    27
    28
    Dim Poly() As Variant
     
    For Z = 1 To Nbr_strat_mesure
        For g = 1 To centile
     
            For l = 1 To Max_Age
     
                Dim Table() As Variant
                ReDim Table(Max_Age)
     
                Table(l) = Tableau_moyenne(g, l, Z) 
             Next l
     
             Dim vecteur_poly As Variant
             Dim vecteurpoly2 As Variant
     
             vecteur_poly = Application.LinEst(Table, Matrice_age)
     
             Erase Table
     
             ReDim Poly(Nbr_strat_mesure * centile, 5)
     
             For u = 1 To 5
                 Poly(Z * g, u) = Application.Index(vecteur_poly, 1, u)
            Next u
     
        Next g
    Next Z

  2. #2
    Expert éminent Avatar de Menhir
    Homme Profil pro
    Ingénieur
    Inscrit en
    Juin 2007
    Messages
    16 037
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Finistère (Bretagne)

    Informations professionnelles :
    Activité : Ingénieur
    Secteur : Industrie

    Informations forums :
    Inscription : Juin 2007
    Messages : 16 037
    Par défaut
    Des Dim dans des boucles !!!
    Argh ! Je crois que je viens de louper une pulsation....

  3. #3
    Membre habitué
    Femme Profil pro
    Étudiant
    Inscrit en
    Avril 2016
    Messages
    11
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Âge : 32
    Localisation : France, Hauts de Seine (Île de France)

    Informations professionnelles :
    Activité : Étudiant
    Secteur : Finance

    Informations forums :
    Inscription : Avril 2016
    Messages : 11
    Par défaut
    Pas sur que ton commentaire m'avance beaucoup pour le problème Linest... D'autres suggestions ?

  4. #4
    Expert éminent Avatar de Menhir
    Homme Profil pro
    Ingénieur
    Inscrit en
    Juin 2007
    Messages
    16 037
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Finistère (Bretagne)

    Informations professionnelles :
    Activité : Ingénieur
    Secteur : Industrie

    Informations forums :
    Inscription : Juin 2007
    Messages : 16 037
    Par défaut
    Citation Envoyé par MarlyM Voir le message
    Pas sur que ton commentaire m'avance beaucoup pour le problème Linest...
    Moi c'est "erreur 2015" qui ne m'avance pas beaucoup : la version littérale du bug aurait été plus explicite.

    Cela dit, étant donné que LinEst n'est pas un objet de Application d'Excel, il est sans doute logique qu'une erreur soit générée.
    https://msdn.microsoft.com/fr-fr/lib.../ff839869.aspx

    Essaye :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    vecteur_poly = Application.WorksheetFunction.LinEst(Table, Matrice_age)

  5. #5
    Membre habitué
    Femme Profil pro
    Étudiant
    Inscrit en
    Avril 2016
    Messages
    11
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Âge : 32
    Localisation : France, Hauts de Seine (Île de France)

    Informations professionnelles :
    Activité : Étudiant
    Secteur : Finance

    Informations forums :
    Inscription : Avril 2016
    Messages : 11
    Par défaut
    Le bug est "L'indice n'appartient pas à la selection".
    Idem en utilisant WorksheetFunction ...

  6. #6
    Expert éminent Avatar de Menhir
    Homme Profil pro
    Ingénieur
    Inscrit en
    Juin 2007
    Messages
    16 037
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Finistère (Bretagne)

    Informations professionnelles :
    Activité : Ingénieur
    Secteur : Industrie

    Informations forums :
    Inscription : Juin 2007
    Messages : 16 037
    Par défaut
    A priori, je pense que cette fonction (qui, de base, est une fonction Excel et non VBA) doit fonctionner avec des matrices de cellules.
    Il est possible qu'elle ne fonctionne pas avec une matrice de variables.

    Pour vérifier, essaye de mettre les valeurs de Table et Matrice_age dans des cellule et de transmettre à la fonction l'adresse des zones dans laquelle elles se trouvent.

    Sinon, utilise Evaluate avec la fonction Excel correspondante.
    https://msdn.microsoft.com/fr-fr/lib.../ff193019.aspx

Discussions similaires

  1. DELPHI, EXCEL : Erreur OLE avec fonction SOMME.SI
    Par benoît14 dans le forum Langage
    Réponses: 4
    Dernier message: 07/01/2013, 12h30
  2. Réponses: 1
    Dernier message: 19/03/2008, 14h12
  3. [VBA] Erreur avec fonction Dcount
    Par Virgile59 dans le forum Access
    Réponses: 6
    Dernier message: 15/06/2006, 09h56
  4. Erreur sur une fonction avec des paramètres
    Par Elois dans le forum PostgreSQL
    Réponses: 2
    Dernier message: 05/05/2004, 21h00

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