condition multipleRésolu

Question

bonjour tout le monde 

jai un ptit problème comme d'hab 

je cherche a imposer plusieurs condition pour excécuter une action 

jai essayé le code suivant (cest un exemple)

Sub test()
If Sheets("Feuil1").Range("A1").Value "1" & Sheets("Feuil1").Range("A2").Value "1" Then
Sheets("Feuil1").Range("C4").Value = "16"
Else
End If
End Sub


jai aussi essayé en remplaçant le & par And et par + mais rien n'y fait et sur le forum je ne trouve pas grand chose

merci de votre aide 
Jacky

cs_Jack · Accepted Answer

Salut
And : une simple lecture de l'aide t'aurait répondu

    If Sheets("Feuil1").Range("A1").Value = "1" And _
       Sheets("Feuil1").Range("A2").Value = "1" Then
            Sheets("Feuil1").Range("C4").Value = "16"
    End If
Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)

Jacky1002 · Answer

ca marche (normal me diras tu)

merci 
jacky

Condition multiple

2 réponses

Votre réponse

Discussions similaires