Inputbox, utiliser le résultat pour modifier un champ

Hello,
Comme le titre l'indique je souhait créer une inputbox qui en fonction de la réponse de l'utilisateur modifie un autre champ.
Voici mon code qui ne fonctionne pas

Code:

---

1 2 3 4 5 6 7 8 9 10

Dim resultat As String resultat = InputBox("Quel coefficient souhaitez vous appliquer pour votre prix de vente? ?", " Variation du prix de vente", "1.3") If IsNumeric(resultat) > 1.2 Then Me.Texte130.Value = IsNumeric(resultat) * Me.Texte122.Value Else MsgBox "veuillez saisir un coef supérieur " End If Me.Texte130.Requery End Sub

---

texte 130 étant le champs a modifier.
Dans l'attente d'une réponse.
cordialement

Bonjour,

Pas ceci :

Code:

---

MsgBox "veuillez saisir un coef supérieur "

---

Plutôt comme ceci :

Code:

---

Me.Texte130 = InputBox("veuillez saisir un coef supérieur ")

---

Merci, Claude de m'accorder de ton temps.
Cependant ça résout pas du tout mon problème
en gros j'ai texte 130 qui un champs calculer (1.2 * prix de revient)
et je souhaite (dans la mesure du possible) que
inputbox : quel nouveau coef ? si la réponse est supérieur à 1.2 alors
me.texte130.value = "réponse de linputbox" (exemple 1.4) * prix de revient

Bonjour,

isnumeric renvoie un booleen ! S'il est true il faut alors utiliser val(resultat) ou 1*resultat.

Alors, plus de message d'erreur du style "incompatibilité de type" et le code fonctionne dans le sens ou le else marche .
Cependant pas de changement concernant le champ...:oops:

Montre ton formulaire avec le nom des contrôles et leur source, on gagnera du temps !
Essaie de donner à tes objets, contrôles... des noms explicites (Coeff, PrixRevient...) sans utiliser d'espaces, caractères spéciaux... Ça facilite la compréhension et ça allège la syntaxe.

:oops:J'ai oublié de préciser que c'était un état put être ça qui bloque...
prixdevente source de donnée = prixrevient*1.2
Code bouton inputbox :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21

Private Sub inputcoef_Click()   Dim resultat As String   resultat = InputBox("Quel coefficient souhaitez vous appliquer pour votre prix de vente? ?", " Variation du prix de vente", Val(1.3)) If Val(resultat) > 1.2 Then     Dim prixrevient, prixvente As Double   prixvente= Me.prixvente.Value prixrevient = Me.prixrevient.Value prixvente = Val(resultat) *prixrevient   Else MsgBox ("yes")   End If Me.prixvente.Requery End Sub

---

désolé du double post cependant personnes n'aurait une petite idée?

prixvente est une syntaxe abrégée de Me.prixvente.Value
En déclarant une variable du même nom cela ne peut que semer l'embrouille :weird:

Dit autrement, il n'y a aucune raison pour que la variable locale prixvente mette à jour le champ prixvente du formulaire ou de l'état...

J'ai pas tout compris.
Que faut il modifier?

:salut:

Comme le disent très justement ClaudeLELOUP et nico84 les noms sont très importants dans le code tant au niveau des variables que des objets que tu utilises.
je te conseille la lecture de cet excellent tuto sur les conventions typographiques du code Visual Basic

Bonne lecture

Bon je me dois de vous dire merci.:D
Toutefois concernant mon problème je reste en standby, j'ai une solution alternative mais qui restreint le choix de l'utilisateur...(en fonction de la réponse choisit entrée dans l'inputbox un nouveau prix s'affiche ou non ).
Je vais continuer a chercher pour ce que je voulais faire initialement mais pour l'instant je suis bloqué et j'aimerais bien une aide sur le cœur du problème(sauf si je passe tout a fait à coté ce qui est possible^^)

Citation:

---

Toutefois concernant mon problème je reste en standby

---

C'est peut-être parce que ta demande n'est pas claire : on croit d'abord qu'il s'agit d'un formulaire, ensuite tu annonces que c'est un état.

Montre une image de ce que tu veux faire pour que ta demande soit plus concrète et qu'il ne faille pas deviner ce que tu essaies de faire et dans quelles circonstances.

Donc
mon état se compose d'une première parti avec l'ensemble des gammes et nomenclatures de l'article( avec quantité et prix).
Une deuxième partie (la ou ça me pose une colle) comme on peut le voir en dessous:
Pièce jointe 146598Pièce jointe 146599
prc: calculé grâce a la première partie
prix de vente mini: prc*1.2

Désolé de ne pouvoir t'aider : j'utilise Access2000. Cette fonctionnalité (bouton de commande dans un état) n'existe pas dans cette version.

C'est rien merci de m'avoir accorder ton temps déjà :D
Je pense, je vais laisser ma version "peu libre" mis en place .
Par ce que je suis vraiment bloqué .
A moins quelqu'un trouve une solution :/
Cordialement