Cellule dans une fonction personalisée

Fermé
ced5757 Messages postés 40 Date d'inscription mercredi 8 mai 2013 Statut Membre Dernière intervention 20 mai 2013 - 18 mai 2013 à 22:00
Frenchie83 Messages postés 2240 Date d'inscription lundi 6 mai 2013 Statut Membre Dernière intervention 11 août 2023 - 19 mai 2013 à 05:51
Bonjour ,
Me voilà face à un problème. Je désire mettre à l'intérieur de ma fonction personnalisée des valeurs changeantes de mes cellules.
Je ne sais pas comment procédé ! J'ai essayé H20, $H$20, "h20"...
merci beaucoup de votre aide !

5 réponses

nigloo06 Messages postés 12 Date d'inscription lundi 25 mars 2013 Statut Membre Dernière intervention 7 février 2019
18 mai 2013 à 22:03
Bonjour,

Peut tu essayer de détailler plus ton problème ? Qu'entends tu part " valeurs changeantes" ???
0
ced5757 Messages postés 40 Date d'inscription mercredi 8 mai 2013 Statut Membre Dernière intervention 20 mai 2013 1
18 mai 2013 à 22:08
En faite j'ai des cellules où l'on rentre des données par exemple dans la cellule d9 on met la valeur 110 que l'on peut changer.
J'aimerai juste savoir comment on peut faire une fonction Y qui prend cette valeur

Idée du programme :

function Y (a as double, b as double) as double

if( a<d9) then Y=d9*b

end if

end function

J'aimerai qu'il compare une valeur à la valeur contenue dans une cellule. Est ce plus clair ?
0
ced5757 Messages postés 40 Date d'inscription mercredi 8 mai 2013 Statut Membre Dernière intervention 20 mai 2013 1
18 mai 2013 à 23:52
S'il vous plait de l'aidee !!!!
0
eriiic Messages postés 24600 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 21 octobre 2024 7 239
19 mai 2013 à 00:12
Bonsoir,

[D9]
ou
range("D9")

Et si tu écris qcq chose derrière ton Then => pas de End If

Tu devrais aller consulter quelques sites sur le B.A.BA du VBA pour apprendre les rudiments...

eric
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Frenchie83 Messages postés 2240 Date d'inscription lundi 6 mai 2013 Statut Membre Dernière intervention 11 août 2023 338
19 mai 2013 à 05:51
Bonjour
supposons que
a soit égal à une valeur de la cellule A1 (ou une autre)
b soit égal à une valeur de la cellule B1 (ou une autre)
d soit égal à une valeur de la cellule D9


Function Y(a As Double, b As Double, d As Double) As Double

If a < d Then Y = d * b

End Function

sélectionne la cellule ou tu veux afficher le résultat, puis dans la barre de formule, tape ceci: =Y(A1;B1;D9)



entre parenthèse tu mets les cellules contenant les valeurs à prendre en compte

a noter que mais tu ne traites pas le cas ou a>=d

cdlt
0