question stupide or/and

[kaiser]

Bonjour

j'ai besoin de faire une condition un peu spéciale mais je ne sais pas comment m'y prendre:
Il faut que la cellule soit soit rouge soit jaune et que son contenue ne soit pas vide.

J'ai essayé:

If Cell.Interior.ColorIndex = 6 Or Cell.Interior.ColorIndex = 38 And Cell.Value <> "" Then

mais ca ne fonctionne pas

Merci

 

[PascalXLD]

Re : question stupide or/and

Bonjour

essaies

If (Cell.Interior.ColorIndex = 6 Or Cell.Interior.ColorIndex = 38) And Cell.Value <> "" Then

 

[kaiser]

Re : question stupide or/and

tout simplement....

Je pensais que l'erreur venait du "Cell.Value <> """....

Merci à toi

 

[Roland_M]

Re : question stupide or/and

bonjour à toi,

c'est normal que ça ne fonctionne pas ça ne signifie rien ! Cell quoi !?
essaye ceci...

NoLig = 1: NoCol = 1 ' les numéros que tu veux
If Cells(NoLig, NoCol).Interior.ColorIndex = 6 Or Cells(NoLig, NoCol).Interior.ColorIndex = 38 And Cells(NoLig, NoCol).Value <> "" Then

' et !!!! avec or les () voir ci-dessous
If (Cells(NoLig, NoCol).Interior.ColorIndex = 6 Or Cells(NoLig, NoCol).Interior.ColorIndex = 38) And Cells(NoLig, NoCol).Value <> "" Then

cordialement. Roland

 

[PascalXLD]

Re : question stupide or/and

bonjour à toi,

c'est normal que ça ne fonctionne pas ça ne signifie rien ! Cell quoi !?

Hop hop un peu de retenue !!

On essaie de comprendre : il est evident qu'il ne s'agit que d'une partie du code; le cell peut-être dans une boucle du genre

for each cell in range("A1:A10)

et dans ce cas là il est très significatif

merci d'avance pour les prochaines interventions

 

[Roland_M]

Re : question stupide or/and

tout à fait Pascal
message reçu
cordialement roland.