Résoudre une équation

natbru

XLDnaute Occasionnel
Bonjour à tous,

J'ai une équation à résoudre un peu compliquée sur laquelle je buche...
Quelqu'un pourrait-il m'aider. Je sais qu'il y a un solveur sur Excel mais je n'arrive pas à l'utiliser.

L'équation est la suivante :
83000=1963*((1-(1+x)^-48))/x)+(8300*(1+x)^-48)

Merci d'avance.

Natacha
 

hoerwind

XLDnaute Barbatruc
Re : Résoudre une équation

Bonjour,

Il y a une parenthèse en trop dans la formule :
=1963*((1-(1+x)^-48))/x)+(8300*(1+x)^-48)
il faut la supprimer

Voir sous l'exemple joint :
Saisir 1 en A2
Dans la formule remplacer "x" par A2
Le reste est expliqué sous l'exemple joint
 

ROGER2327

XLDnaute Barbatruc
Re : Résoudre une équation

Bonsoir à tous
Une petite fonction personnalisée fera peut-être l'affaire ?
Code:
[COLOR=DarkSlateGray][B]Function tauxx(c#, m1#, m2#, k#)
Application.Volatile 'Facultatif
Dim u0#, u1#, u2#, y0#, y1#, y2#
  u1 = 0.1: y1 = c - m1 * (1 - (1 + u1) ^ -k) / u1 - m2 * (1 + u1) ^ -k
  u2 = 0.05: y2 = c - m1 * (1 - (1 + u2) ^ -k) / u2 - m2 * (1 + u2) ^ -k
  Do Until Abs(y2) < 0.0000000000001 Or y2 = y1
    u0 = u1: u1 = u2: y0 = y1: y1 = y2
    u2 = u0 - y0 * (u1 - u0) / (y1 - y0): y2 = c - m1 * (1 - (1 + u2) ^ -k) / u2 - m2 * (1 + u2) ^ -k
  Loop
  tauxx = u2
End Function[/B][/COLOR]
Code:
[B][COLOR=DarkSlateGray]=TAUXx(83000;1963;8300;48)[/COLOR][/B]
renvoie 0.008318694 (ou 0.8318694%).
ROGER2327
#4527


Mardi 10 As 138 (Saint Abstrait, bourreau, SQ)
22 Brumaire An CCXIX
2010-W45-5T17:42:06Z
 

natbru

XLDnaute Occasionnel
Re : Résoudre une équation

Merci beaucoup, je n'ai pas compris le code utilisé mais au moins j'ai une réponse pour mon équation.
Après si qqn veut bien m'expliquer comment on utilise le solveur sous excel, je suis interessée.

Merci encore.
 

Discussions similaires

Statistiques des forums

Discussions
314 645
Messages
2 111 536
Membres
111 184
dernier inscrit
amiko