Discussion :

[Maxence45]

Bonsoir j'ai écrit une fonction qui calcul le discriminant d'une équation du seconde degré ax²+bx+c , la voici :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Function delta(ByVal a As Integer, ByVal b As Integer, ByVal c As Integer) As Integer
delta = b * b - 4 * a * c
End Function

Quand je tape sur F5 , au lieu de s'exécuter , çà me lance une fenêtre où je dois taper le nom de la macro , quelqu'un sait pq ?

merci

[fred65200]

bonsoir,
Peut être parce que la fonction DELTA existe déjà sur Excel.
(pas la même). Renomme ta fonction et tiens nous au courant.

Cordialement

[Maxence45]

j'ai essayé de changer avec d'autres noms , çà ne marche tjs pas

[fred65200]

re


Si tu parles de F5 dans VBE, la commande Exécuter n'exécute que des macros sans argument ou des userfroms. Pas des fonctions.

@+

[Maxence45]

je comprends mieux , et si je veux la tester dans excel je mets par exemple delta(1;0;0) , çà m'envoit #NOM?

[fred65200]

re
N'oublie pas le signe =
=delta2(1;0;0)
ou
=DELTA2(A1;A2;A3)


DELTA existe déjà sur EXCEL, avec 2 arguments seulement!
@+

[Maxence45]

je l'ai mis et j'ai cette erreur...

[fred65200]

re
est ce que la fonction est dans le classeur dans lequel tu saisies ta formule?

Et je répète n'utilise pas DELTA.

@+

[Maxence45]

çà marche , meme en utilisant delta , c'est bon , merci pour tout

[fred65200]

re

ta formule fonctionne sur ton poste avec DELTA, (tu ne doit pas avoir Delta a 2 arguments) mais elle ne fonctionnera pas sur le poste de quelqu'un qui a cette fonction (à deux arguments) sur son poste. As toi de voir si c'est pour un usage unique.

cordialement

[Maxence45]

j'ai trouvé très curieux que tu corriges pas le code de ma fonction car moi en correction j'ai ce code ci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Function couik(ByVal a As Integer, ByVal b As Integer, ByVal c As Integer) As Integer
Dim resultat As Integer
    resultat = b * b - 4 * a * c
    couik = resultat
End Function

[fred65200]

re

je n'avais pas mis couik mais delta2. C'est moins poétique je te l'accorde

bonne nuit

[Maxence45]

oui mais tu trouves pas bizarre que ma fonction marche autant que la correction ?

alors pq dans la correction ils se sont ennuyés à rajouter un Dim , et faire passer la fonction par une variable "resultat" ?

[fred65200]

je ne sais pas trop, peut être une habitude ancestrale de programmeur pour les fonctions plus complexe.

Maintenant tu nous fais la fonction pour le calcul des déterminants (ou discriminants, je ne sais plus) pour une équation du second degré?

@+

[Maxence45]

? ben c'est ce que j'ai fait , je vais me coucher , j'attaque demain la procédure en rapport avec cette fonction ...bonne soirée .

[alsimbad]

pour ce qui est de la fonction proprement dite, je sais pas ce qu'il y a de bon ou pas bon, mais pour ce qui est de la question

Quand je tape sur F5 , au lieu de s'exécuter , çà me lance une fenêtre où je dois taper le nom de la macro , quelqu'un sait pq ?

la réponse est plus simple. F5 ne lance pas les fonctions
il te faut ecrire une fonction et une procedure appelante

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
Function delta(ByVal a As Integer, ByVal b As Integer, ByVal c As Integer) As Integer
delta = b * b - 4 * a * c
End Function
sub test_appel
call delta (4 , 12 , 65)
'ou alors MsgBox delta(4, 12, 65)
end sub
ça te permet de voir si ton calcul est cohérent et de tester tes variables (en executant par  F8 c'est plus facile) avant de tester dans les cellules

[Invité]

Bonjour

Pour tester une fonction tu peux aussi le faire à l'aide de la fenêtre exécution.

Pour l'afficher Affichage/Fenêtre exécution (ou ctrl+G)

Là tu tapes ta fonction avec les paramètres en la faisant précéder de ?

Ainsi :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

? Delta(2,3,2)

et tu valides, le résultat va s'afficher juste en dessous.

[Daranc]

merci Starec
je ne connaissait pas le truc ,il va m'éviter les incessants allers retours entre VBA et Excel
Cordialement
Daranc

[Invité]

Pour préciser, cette fonction doit être déclarée en Public et dans un module, et non dans le code d'une feuille.

[Pierre Fauconnier]

Bonjour

...
la réponse est plus simple. F5 ne lance pas les fonctions
il te faut ecrire une fonction et une procedure appelante...

Attention à la précision des réponses svp, pour ne pas embrouiller la personne qui pose la question.

F5 peut sans problème lancer une fonction.

En fait, F5 et F8 peuvent lancer des procédures ou des fonctions, mais il faut que ces procédures et fonctions ne requièrent aucun paramètre, même si ces paramètres sont optionnels...!

Pour les procédures ou fonction requérant des paramètres, il faut les lancer à partir d'une procédure ou de la fenêtre d'exécution, en passant alors les paramètres adéquats.


Bonne journée