Boucle If sous VB [Résolu]

ce type de code marche très bien sous VB
regarde un peu les tutoriaux ici :
http://vb.developpez.com/cours/

If AgeFrederic > 30 Then
     'Instructions si la condition est vraie
     msg = "Frédéric a plus de 30 ans"
     MsgBox msg
ElseIf AgeFrederic >25 Then
     'Instructions si la condition est vraie
     msg = "Frédéric a plus de 25 ans"
     MsgBox msg
ElseIf AgeFrederic >20 Then
     'Instructions si la condition est vraie
     msg = "Frédéric a plus de 20 ans"
     MsgBox msg
ElseIf AgeFrederic > 15 Then
     'Instructions si la condition est vraie
     msg = "Frédéric a plus de 15 ans"
     MsgBox msg
Else
     'Instructions si la condition est fausse
     msg = "Frédéric a 15 ans ou moins de 15 ans"
     MsgBox msg
End If

de rien, met l'option résolu devant ton titre (si tu reviens)

bonjour je suis un debutant en vb ,j'aimerai savoir comment on programme avec un if?

Bonjour je suis débutant en vb . j'ai un ptit problème dans mon if .O fait jveu mettre if a=b and b=c then ...
mets le pc beugue directement et ché pas pk. Merci davance pour votre aide!!

bonjour,

Mets ton bout de code pour qu'on puissse se faire une idée ... merci

;o)

Bonjour à tous,

pour ma part je n'arrive pas à imbriquer plusieurs boucles if, avec une seule ça roule, mais avec plusieurs on dirait qu'une seule est prise en compte. Ca ne marche pas tout à fait comme du langage C a priori, quelqu'un pourrait-il m'expliquer mon problème de syntaxe? voici une version simplifiée de mon problème :

Function a(x)
If 0 < x <= 1 Then
a = 1
ElseIf 1 < x <= 2 Then
a = 2
Else
a = 0
End If
End Function

Cela donne toujours a=1.

Merci.

peux tu mettre ton vrai code stp?
pke pour le moment ce pseudo code m'a l'air corect.
il y a peut etre une petite pichenette quelque part...

bonjour les tests ne s'ecrivent pas comme cela:

If 0 < x <= 1 Then

doit s'ecrire
if (x >0) and (x<=1) then

...

Bonjour tout le monde, merci de m'avoir répondu. En fait j'ai trouvé ça aussi hier, ce langage n'accepte pas les encadrements, j'ai essayé :

if x>i-1 and x<i then (sans parenthèse ça marche)
a=i
...

Voilà merci beaucoup, bonne continuation.


ps: j'abuse peut être un peu mais si qqn sait comment on fait pour que cette fonction soit toujours utilisable(sur la version 2007) je suis preneur.

dsl je connais pas du tout excel 2007
ai pire imbrique deux fonctions if
sinon c'ets bien que tu aies trouvé!
bonne continuation, et ptet a bientot!

ben par exemple dans mon code test j'ai:
Sub f()
Dim mycell As Object
Dim k As Integer, l As Integer
mycell = Application.InputBox("choisir une cellule", "choix d'une cellule")
k = mycell.Row
l = mycell.Column
MsgBox "k=" & k & "l=" & l
End Sub



du coup je fais comme ça:
Sub g()
Dim k As Integer, l As Integer
k = InputBox("indice ligne", "choix case", 1)
l = InputBox("indice colone", "choix case", 1)
MsgBox "k=" & k & " & " & "l=" & l
End Sub

Le premier ne marche pas. Mais moi j'aimerai cliquer sur une cellule au lieu d'entrer les indices. Du coup ça vient soit de la declaration de mycell, soit de l'application Application.InputBox qui ne marche pas pour les objets...(???)

ok g compris, merci bcp

d'ou l'interet de voir le code...