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

Correction dans un code

Marti Marti

XLDnaute Occasionnel
Bonjour Forum
Bonjour à tous et à toutes
S'il vous plaît, si vous pouvez m'aider à résoudre ce problème
Dans cet UserForm j'ai 3 differents cas à faire ..j'ai essayé avec ce code dedans mais j'ai pas arriver à une solution impeccable :
1 - PREMIER CAS :
Si OptionButton1 = True alors UserForm2 s'affichera et tous les controles seront vides
2 - DEUXIEME CAS :
Si OptionButton2 = True ..alors :
TextBox6 = ("00.00")
TextBox2.Text = (ComboBox1.Value) * (TextBox1.Value)
TextBox4.Text = (ComboBox2.Value) * (TextBox3.Value)
TextBox5.Text = (TextBox2.Value) + (TextBox4.Value)
3 - TROISIEME CAS :
Si OptionButton3 = True et ComboBox1 = 0 .. alors
TextBox6 = ("100.25")
TextBox2.Text = (ComboBox1.Value) * (TextBox1.Value)
TextBox4.Text = (ComboBox2.Value) * (TextBox3.Value)
TextBox5.Text = (TextBox2.Value) + (TextBox4.Value)

Si OptionButton3 = True et ComboBox1 > 0 c'est à dire (1-2-3-4-5) ..alors :
TextBox6 = ("875.25")
TextBox2.Text = (ComboBox1.Value) * (TextBox1.Value)
TextBox4.Text = (ComboBox2.Value) * (TextBox3.Value)
TextBox5.Text = (TextBox2.Value) + (TextBox4.Value)

REMARQUE : L'UserForm3 s'affichera seulement pour nous avertir lorsque la valeur choisit dans ComboBox2 est plus grande que la valeur choisit dans ComboBox1 .. car obligatoirement la valeur de ComboBox1 soit toujours égale ou plus grande que la valeur choisit dans ComboBox2

Merci beaucoup d'avance pour l'aide
Cordialement
MARTI MARTI
 

Pièces jointes

  • calculate avec condition.xlsm
    21.9 KB · Affichages: 24
Dernière édition:

Marti Marti

XLDnaute Occasionnel
Re : Correction dans un code

Bonjour mutzik
Je suis vraiment tres desolé .. j'ai fais une grande erreur dans mes explications et mes donnees .. j'ai voulu simplement reorganiser mon fichier .. et apres je vais le poster
Mes excuses avec tous mes respects
Sincerement
MARTI MARTI
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…