VBA fonction si

[natacha]

Bonjour à tous,
voila j'ai souhaité passer par la fonction si imbriqué et pbl j'ai plus de 7 "si", alors ça me plante.
Je voulais passer par VBA, mais j'arrive pas à trouver la syntaxe.
Merci d'avance

 

[smotty]

Re : VBA fonction si

bonjour natacha,

Tu as 2 possibilités:

If condition then

elseif condition then

etc...

end if

ou plus simple avec nombreuses conditions:

select case "element"
case condition1
code ici
case condition2
code ici
case else
code ici


end select

cordialement

 

[natacha]

Re : VBA fonction si

Merci pour cette réponse,
mais j'aimerais mettre plusieurs condition dans mon select case (ex:
si i1="Papiers1500" et c12<10 alors...)
Je n'arrive pas à trouver la syntaxe pour ajouter un et .
merci d'avance

 

[jp14]

Re : VBA fonction si

Bonjour

Merci pour cette réponse,
mais j'aimerais mettre plusieurs condition dans mon select case (ex:
si i1="Papiers1500" et c12<10 alors...)
Je n'arrive pas à trouver la syntaxe pour ajouter un et .
merci d'avance

If i1="Papiers1500" and c12<10 Then

JP

 

[natacha]

Re : VBA fonction si

Ben j'ai tenté de faire :

If i1 = "Papiers1500" And c12 <= 1 Then
j2 = "<1m"
End If

Mais en fait on ne rentre jamais dans ma condition , même si i1="Papiers1500" et c12 <= 1. Je pense donc que ma syntaxe est pas bonne, mais je coince.
Merci d'avance.

 

[skoobi]

Re : VBA fonction si

Bonjour smotty, jp14, natacha,

si tu fais référence à une cellule en VBA, il faut faire comme ceci:

If Range("I1").Value = "Papiers1500" And Range("C12").Value <= 1 Then
Range("J2").Value = "<1m"
End If

😉

De plus, si tu as juste une seule condition, tu n'as pas besoin du "End If":

If Range("I1").Value = "Papiers1500" And Range("C12").Value <= 1 Then Range("J2").Value = "<1m"