If Sheets("Para").Range("e1").value = ("janvier" ou "juillet" ou "décembre") Then

[Evelynetfrancois]

bonsoir tous le monde
juste un petit soucis
peut on écrire en vba

If Sheets("Para").Range("e1").value = ("janvier" ou "juillet" ou "décembre") Then

si oui comment ?
merci pour tout
ps : ce n est pas urgent du tout

EetF

 

[CBernardT]

Re : If Sheets("Para").Range("e1").value = ("janvier" ou "juillet" ou "décembre") The

bonsoir à tous,

With Sheets("Para")
If.Range("E1").value = "janvier" or.Range("E1").value ="juillet" or .Range("E1").value ="décembre") Then
-----
end if
end With

 

[camarchepas]

Re : If Sheets("Para").Range("e1").value = ("janvier" ou "juillet" ou "décembre") The

Bonsoir ,

Petite variante possible :

If InStr(1, "janvier,juillet,décembre", Sheets("Para").Range("e1").Value) > 0 Then Stop

 

[Evelynetfrancois]

Re : If Sheets("Para").Range("e1").value = ("janvier" ou "juillet" ou "décembre") The

merci beaucoup CBernardT ta solution va très bien
je pensais que le "or" suffisait sans rappeler la cellule chaque fois "or.Range("E1").value "
merci pour tout
tres bonne soirée a tous
E et F

 

[Speel]

Re : If Sheets("Para").Range("e1").value = ("janvier" ou "juillet" ou "décembre") The

Bonsoir,

If Sheets("Para").Range("e1").value = "janvier" or Sheets("Para").Range("e1").value = "juillet" or Sheets("Para").Range("e1").value = "décembre" Then

ou alors

j = Sheets("Para").Range("e1").value
If j = "janvier" or j = "juillet" or j = "décembre" Then

 

[camarchepas]

Re : If Sheets("Para").Range("e1").value = ("janvier" ou "juillet" ou "décembre") The

Bonsoir à tous ,
@ Speel : La charrue avant les boeufs ,

Plutot J= Sheets("Para").Range("e1").value

 

[Speel]

Re : If Sheets("Para").Range("e1").value = ("janvier" ou "juillet" ou "décembre") The

Bonsoir,

@ Speel : La charrue avant les boeufs ,

comme quoi ! la relecture y'a que ça de vrai ...