Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

une librairie vba nombre complexe

  • Initiateur de la discussion Initiateur de la discussion ortollj
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

O

ortollj

Guest
Bonjour

j'ai recopié une library vba complexe sur Pfadintegral dotCom
avec licence public GNU. voir plus bas.la librarie de Martin schmelzle est dans Module 1
je joint un fichier excel qui affiche 2 courbes (x^y)^z et (x^z)^y, avec x,y,z nombre ,complexe il faut cliquer sur Alt F11 pour aller dans le code vba excel.
sur la page data pour calculer les donnés il faut cliquer sur le bouton fill up, et sur draw pour tracer les deux courbes.
x, y, z sont en haut a gauche de la page data. dans le tableau:x= 1+20*i,y= 1+1*i,z= 1+1*i
pour varier les x je multiplie par la valeur k(ici 1,001).
pour varier les y, je multiplie par la valeur k
pour varier les z, je multiplie par la valeur 1/k
ca peut sans doute servir a d'autre.si quelqu'un voit une erreur merci de la signaler.
a Martin et a moi sur erreur librairie, et a moi sur erreur programme.
suite a une discussion sur
http://www.maths-forum.com/complex-exp-complex-exp-complex-124729.php

'A copy of the GNU General Public License is available at
'http://www.fsf.org/licensing/licenses
'
'Copyright © 2010 Martin Schmelzle
'
'Contact Information
'
'martin.schmelzle@pfadintegral.com
'http://pfadintegral.com
'
'Revision History
'
'Version Date By Description
'
'1,0 2010-03-27 Martin Schmelzle Initial release
 

Pièces jointes

Dernière modification par un modérateur:
Re : une librairie vba nombre complexe

'jutilise la librairie de Martin Schmelzle
mais je ne sais pas ce que signifie les 1# et 0# ci dessous dans la fonction CExpX() !!!
1er variable d'entrée et 2em variable ?

Public Function CExpX(ByRef base As Complex, ByRef power As Complex) As Complex
' two argument exponential function
' base ^ power = exp(base * Log(power))

If CIsZero(base) = True Then
CExpX.re = 1#
CExpX.im = 0#
Else
CExpX = CExp(CMult(base, CLog(power)))
End If

End Function
 
Re : une librairie vba nombre complexe

Bonjour,

C'est le signe qui signale que le nombre est un nombre au format Double. (format de Grande précision 10^308 environ). En gros 1# = 1.00000000000000 et 0# = 0.00000000000000 (15 chiffres de précision)
 
Re : une librairie vba nombre complexe

merci Softmama
attention il y a vait une erreur dans le code vba
sur 'xPzPy
wsDatas.Cells(lig, xPzPyColre) = xPzPy.re a cause d'un copier collé mal renomé il y avait (wsDatas.Cells(lig, xPzPyColre) = xPyPz.re
de plus j'ai inseré 4 colonnes de plus avec les valeurs de x^z.

encore une erreur de plus qui prouve que je suis humain !
 

Pièces jointes

- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

D
Réponses
2
Affichages
948
D
S
Réponses
4
Affichages
3 K
S
C
Réponses
12
Affichages
1 K
chacal33
C
N
Réponses
5
Affichages
3 K
Nicocotte125
N
H
Réponses
19
Affichages
7 K
Réponses
12
Affichages
2 K
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…