Variable conditionnée

[MIKE]

Salut les gars, le forum, (coucou particulier à Hervé 😉 )

Voici mon nouveau probleme... Je me lance désormais dans l'ecriture des variables et bien que j'ai lu pas mal de post sur le sujet, je n'en trouve pas qui puisse me renseigner sur mon dileme...

Voilà, j'ai un UF avec 2 Textbox

i = TextBox2.value

Je voudrais que

Si 13 >= i >= 6
alors TextBox1 = i - 5

Si 17 >= i >= 15
alors TextBox1 = i - 6

Si 21 >= i >= 19
alors TextBox1 = i - 7

Voila, sauf que je me plante dans tous mes essais de formules et j'ai même planter excel... :S :whistle:

En tout cas merci à ceux qui se pencheront sur mon probleme (et promis je vais m acheter un bouquin sur VB ds excel pour arreter de vous emm...der avec mes questions !!! ) 🙂

 

[myDearFriend!]

Bonsoir MIKE,

Ci-dessous 2 façons de faire pour le même résultat (si j'ai bien compris la question....) :

Sub Traitement1()
Dim i As Variant
      i = TextBox2.Value
      If IsNumeric(i) Then
            If i >= 6 And i <= 13 Then
                  TextBox1 = i - 5
            ElseIf i >= 15 And i <= 17 Then
                  TextBox1 = i - 6
            ElseIf i >= 19 And i <= 21 Then
                  TextBox1 = i - 7
            Else
                  'Ce que tu veux ici pour les autres cas...
            End If
      End If
End Sub

Sub Traitement2()
Dim i As Variant
      i = TextBox2.Value
      If IsNumeric(i) Then
            Select Case i
            Case 6 To 13
                  TextBox1 = i - 5
            Case 15 To 17
                  TextBox1 = i - 6
            Case 19 To 21
                  TextBox1 = i - 7
            Case Else
                  'Ce que tu veux ici pour les autres cas...
            End Select
      End If
End Sub

Cordialement,

PS: Si on pensait que tu dérangeais avec tes questions, je pense qu'on fermerait le Forum, car il est fait avant tout pour ça...🙂   Cela dit, un bon bouquin ne fait pas de mal.... 😉

 

[MIKE]

Re Didier MDF,

Merci à toi car ta réponse me réjouit... CA MARCHE !!!

Encore merci donc...

P.S.: pour ton P.S., je vais à la fnac dès demain !!! 😉

A+