Utiliser des fonctions excel sous vbRésolu

Question

Salut!
Savez vous comment utiliser la fonction "linest" (="droitereg"(droite de regression)) sous vb?
il doit bien y avoir des API excel, que lon peut choper pour sen servir avec VB?

Si ca nest pas possible, quelqun pourrai me dire comment lancer excel automatiquement avec VB,coller des données dans des célulles,et les récuperer....?

Utilisateur anonyme · Accepted Answer

Jai trouvé, cest
ObjExcel.Run "MaMacro", param1,parm2,...

cs_jordinette · Answer

bonjour,
c'est quoi ton 'linest'?
Ouvrir Excel et coller des données (qui sorte d'où???) dans des cellules de manière automatique c'est faisable. récupéré des données dans des cellules, c'est très simple mais pour en faire quoi?
Jordinette

Utilisateur anonyme · Answer

Tout dabord, linest est une fonction qui, à partir de coordonnées de points(qui forme + ou - une droite), donne une équation approximative de la courbe. Les résultat obtenus de linest sont des coefficients.Le nombre de coeff est au choix. moi il men faut 6.(pour une equation du sixième degré. ex:y= k6 * x^6 + k5*x^5+k4*x^4+k3*x^3+k2*x^2+k1*x+ K )

les données à coller sont donc les coordonnés des points que jai.
et les données à recuperer sont les coeficients.
Voilà.
Donc eske tu connais la procédure pour ouvrir excel, et coller les coordonnés dans les céllules?
jimagine quil faut collé la formule excel linest dans une céllule et lancer le calcul...puis recuperer les resultats.

 mais je suis néophyte. Aidez-moi!

cs_alpamayo · Answer

Je pense que ce qu'il te faut est ci-apr&#232;s :

'pour lancer excel depuis VB :
Dim ObjExcel As Object
dim Valeur as double
    'ouverture d'Excel
    On Error Resume Next ' pour e&#233;viter de retourner une erreur si Excel est d&#233;j&#224; ouvert
    Set ObjExcel = GetObject(, "Excel.application") 
    If ObjExcel Is Nothing Then Set ObjExcel = CreateObject("Excel.application")
    On Error GoTo ErreurImpressionExcel
    ObjExcel.Visible = True
     ObjExcel.Workbooks.Add "NomFichier.xls"
   ' met valeur dans la cellule
   Valeur = 123
   ObjExcel.ActiveWorkbook.sheets(1).cells(iligne, icol).Value = Valeur

   ' lance une macro (utile pour toi pour lancer un calcul)
   ObjExcel.Run "MaMacro"

   ' r&#233;cup&#232;re une valeur de cellule (&#224; la limute si la macro de calcul prend du temps, met une boucle d'attente avant de r&#233;cup&#233;rer la valeur
   Valeur =ObjExcel.ActiveWorkbook.sheets(1).cells(iligne, icol).Value

Pierre
alpamayo

Utilisateur anonyme · Answer

Ok, cest cool!
Merci pour le tuyau

Utilisateur anonyme · Answer

Jai rencontr&#233; un nouveau probl&#232;me; on ne peut appeller une macro en passant des parametre.
L'astuce est de coller la valeur de la variable parametre dans une c&#233;llule, et de la r&#233;cuperer avec la macro.
Le hic cest que durant les manip jefface toutes les cellules. Donc il me faudrait une autre solution, merci.

cs_alpamayo · Answer

je n'ai pas test&#233; pour le passage des param&#232;tres, ce que tu peux d&#233;j&#224; faire c'est cr&#233;er une autre feuille avec un sheets.add, tu mets tes variables dedans et tu effaces la feuille apr&#232;s tes traitements sur la feuille1 (fais un sheets(1).activate pour travailler sur la feuille 1)

alpamayo

bilalbilo · Answer

Utiliser des fonctions excel sous vb

Utiliser des fonctions excel sous vb

8 réponses

Discussions similaires