Discussion :

[luko6]

Bonjour à tous,
grâce à vous j'ai pu faire tourner ce code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
For Each Cellule In Range("i4:i6000")
        If Cellule Like "*Frais*" Or Cellule Like "*Train*" Then Cellule(1, 2) = "Frais"
    Next Cellule

cependant je voudrais l'utiliser avec deux conditions If ; comme ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
For Each Cellule In Range("i4:i6000")
        If Cellule Like "*Formation*" and If Cellule(1,2)= "" Then cellule(1,2)= "Training"

mais il ne marche pas
j'ai essayé avec elseif en vain également j'aimerais connaitre le code qui permet de cumuler des "IF"
merci

[HurGeek]

Bonjour,
enlève le if après le and et cela devrait fonctionner

[Jean-Philippe André]

salut,

à trop vouloir diminuer le nombre de ligne, on finit par perdre les notions de base pour ces tests Si/Sinon

soit tu pars sur un test test1 et test2

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
For Each Cellule In Range("i4:i6000")
        If Cellule Like "*Formation*" and Cellule(1,2)= "" Then 
                cellule(1,2)= "Training"
        End If
Next Cellule

ce qui donnerait en mettant tout sur une seule ligne

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
For Each Cellule In Range("i4:i6000")
        If Cellule Like "*Formation*" and Cellule(1,2)= "" Then cellule(1,2)= "Training"
Next Cellule

[luko6]

Merci pour la réponse et pour le conseil