XL 2013 Equation second degré et code VBA

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 6 Avril 2020

• #2

Bonjour Richard,
Quoique cela fait longtemps ... en PJ un essai.
La syntaxe est Complex(Reel,Imaginaire,"i")

VB:

Cells(6, 2) = WorksheetFunction.Complex((-b / (2 * a)), (Sqr(-delta) / (2 * a)), "i")
Cells(7, 2) = WorksheetFunction.Complex((-b / (2 * a)), (-Sqr(-delta) / (2 * a)), "i")

De plus a et b me semblent erronés :

http://lescop.gmp.free.fr/IMG/pdf/trinome_complexe.pdf

 

Pièces jointes

• ResolutionEquationSecondDegre.xlsm

  25 KB · Affichages: 8

Vote positif 0 Vote négatif

J

jmfmarques

XLDnaute Accro

• 6 Avril 2020

• #3

Bonjour
S'agissant d'abord de la résolution mathématique, quelle est donc l'équation que vous avez établie pour déterminer l' "unité imaginaire" nécessaire ?
VBA ne résout rien, lui. Il applique.

 

Vote positif 0 Vote négatif

R

Richard 58

XLDnaute Nouveau

• 7 Avril 2020

• #4

Bonjour Sylvanu

Cela a l'air bon.
Je vois avec lui

Par contre, pourquoi un module 1 supplémentaire ?

 

Vote positif 0 Vote négatif

sylvanu

XLDnaute Barbatruc

Supporter XLD

• 7 Avril 2020

• #5

Bonjour,
Juste un oubli de suppression.
L'enregistreur de macro permet rapidement de voir la syntaxe. Là j'ai vu que la syntaxe de Complexe était Complex(a,b,"i"). C'est tout, vous pouvez supprimer.

 

Vote positif 0 Vote négatif

Solution

R

Richard 58

XLDnaute Nouveau

• 7 Avril 2020

• #6

ok merci

 

Vote positif 0 Vote négatif