Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1031 connectés 

  FORUM HardWare.fr
  Programmation

  [VBA] fair la fonction valeu cible en VB

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

[VBA] fair la fonction valeu cible en VB

n°93738
cyfl
Posté le 26-01-2002 à 17:57:12  profilanswer
 

ben voila , je voudrais crée en VB un truc pour pouvroir faire ça
quelqu'un peu m'aider  :hello: ?
 
merci !


---------------
Les cons, ça ose tout. C'est même à ça qu'on les reconnaît.
mood
Publicité
Posté le 26-01-2002 à 17:57:12  profilanswer
 

n°93872
cyfl
Posté le 27-01-2002 à 14:47:17  profilanswer
 

UP !!
 
ça serait sympas !


---------------
Les cons, ça ose tout. C'est même à ça qu'on les reconnaît.
n°93874
ethernal
Chercheur de vérité...
Posté le 27-01-2002 à 15:25:04  profilanswer
 

bha oui mais je comprends rien à ta question ...  :??:  
tu peux la reformuler stp ?

n°93940
cyfl
Posté le 27-01-2002 à 20:18:03  profilanswer
 

Lorsque vous connaissez le résultat souhaité d'une formule isolée, mais non la valeur d'entrée dont la formule a besoin pour déterminer le résultat, vous pouvez utiliser la fonction Valeur cible. Pendant la recherche de la valeur cible, Microsoft Excel fait varier la valeur d'une cellule déterminée jusqu'à ce que la formule dépendant de cette cellule renvoie le résultat souhaité.
 
c ce que dis EXCEL pour valeur cible
et c ça que je veuts faire , mais en code
 
merci !


---------------
Les cons, ça ose tout. C'est même à ça qu'on les reconnaît.
n°93949
Ventilo
Ventilo? Depuis 1998!
Posté le 27-01-2002 à 20:58:15  profilanswer
 

Hummm en VB?
 
disont a+b+c+d=e
si  
a=1
b=-2
c=3
d=3
e = 10
 
alors il manque 5 pour faire 10...
 
en code

Code :
  1. Function TrouveValeur(Reponse As Integer, ParamArray ValeurConnues())
  2.     Dim Total As Integer
  3.     Dim i As Integer
  4.    
  5.     For i = LBound(ValeurConnues) To UBound(ValeurConnues)
  6.         Total = Total + ValeurConnues(i)
  7.     Next i
  8.    
  9.     TrouveValeur = Reponse - Total
  10. End Function


 
pour trouver la valeur qui manque pour arrivé à reponse tu fait :

Code :
  1. MsgBox TrouveValeur(10, 1, -2, 3, 3)


 
qui trouve se qui manque à 1, -2, 3, 3 pour donner 10...
 
Franchement je vois pas a quoi sa peut servir mais bon  :)  
 
ya surment des bugs, jai fait ca vite ...

 

[edtdd]--Message édité par Ventilo--[/edtdd]


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation

  [VBA] fair la fonction valeu cible en VB

 

Sujets relatifs
[JavaScript] une fonction équivalent à ctrl+C ?[Delphi] Fonction CreateDirectory
VBA Excel - HelpFonction mail en php , la parade.
[WinDev] URGENT !! Pb avec la fonction "Remplace"tracer une fonction mathématique sous Borland C++5
VBA / Access /clipboard[C] une fonction qui retourne un tableau ..
[VBA] Pb avec ma boucle while .... Synthaxe sans doute[ C ] fonction pour recuperer le code ASCII d'un caractere HELP !!!
Plus de sujets relatifs à : [VBA] fair la fonction valeu cible en VB


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR