j'ai un tableau de ce type:
Temperature 50 100 200 300
valeur 1.6 2.3 3.5 4.4
avec excel il est possible de faire une interpolation
linéaire pour obtenir des valeur intermédiaire
par exemple:
pour avoir la valeur interpolé correspondant a la
température 70 ( compris 50 et 100).
on utilise sous excel une fonction:
PREVISION(70,range des valeur, range des température)
je voudrait dans une subroutine faire la même chose
j'ai essayer en tentant
application.PREVISION(etc...)
(pour dire a VBA d'aller utiliser la fonction PREVISION
existante déja dans l'application excel)
mAIS ca marche pô !!!!
pouvez vous m'aidez s'il vous plait a faire mon
interpolation linéaire
MERCI
Avec tes températures en A1:D1 et tes valeurs en A2:D2
Sub LaPrevision()
MsgBox Application.Forecast(70, [A2:D2], [A1:D1])
End Sub
Alain CROS.
P.S.
Pour les questions sur Excel, voir microsoft.public.fr.excel
"francois" <FRANCOIS....@technicatome.fr> a écrit dans le message de news: 084f01c33035$19ae7750$a001...@phx.gbl...
mais pour info, comment j'aurais pu trouver, car dans
l'HELP, "Liste des fonctions de feuille de calcul
disponibles dans Visual Basic" la fonction "forcast"
n'existe pas!!!! ni la fonction "prevision" de excel
d'ailleur...
et pourtant ca marche avec forcast...
>-----Message d'origine-----
>.
>
Sub LaPrevision()
MsgBox Application.WorksheetFunction.Forecast(70, [A2:D2], [A1:D1])
End Sub
Il y a un exemple dans la "Liste des fonctions de feuille de calcul
disponibles dans Visual Basic".
Et je réponds bien à une question VBA et pas Excel.
Meilleures salutations.
Claude Mani
"christophe" <FRANCOIS....@technicatome.fr> a écrit dans le message
de news: 02cf01c3303c$a473a840$a101...@phx.gbl...
Dans menu ? >> Sommaire et Index >> Onglet Rechercher >> PREVISION
Pour Forecast en vba, c'est plus difficile.
Les fonctions de feuille de calcul disponible en vba te sont proposées en faisant Application.WorksheetFunction.
La liste t'est alors proposée après le point mais en Anglais.
Donc un petit dictionnaire et ça roule.
Tu peux établir ta fonction qui marche dans une cellule puis utiliser cette sub
Sub LireFormule()
Debug.Print Range("a1").Formula
End Sub
Plusieurs sites existent avec les traductions.
http://www.info-3000.com/vbvba/traductionfonction.php
http://cherbe.free.fr/traduc_fonctions_xl97.html
http://www.acoustics-noise.com/ATPtranslator.shtml
La meilleure façon pour résoudre un problème sur Excel reste microsoft.public.fr.excel
Alain CROS.
"christophe" <FRANCOIS....@technicatome.fr> a écrit dans le message de news: 02cf01c3303c$a473a840$a101...@phx.gbl...
Ce fonction est un des macros compementaire.
Ca ne marche pas perVB ou VBA.
Le troisième link traduit tous les functions d'Excel inclus des Macros
complémentaires.
Eric
"Alain CROS" <alain...@free.fr> wrote in message news:<#OqcZRFM...@tk2msftngp13.phx.gbl>...
Jij schreef :
> Exuser moi pour ma langue Français,
> Je suis Flamand.
Opmerkelijk moeite ! :-) Bravo !
--
Pierre ALEXIS - MVP Visual Basic
Courriel & messenger : alexis...@hotmail.com
FAQ Visual Basic : http://faq.vb.free.fr/