Function trouverCouleur(J, c)
Select Case J
Case 0
trouverCouleur = "Bleu"
Case 1 To 5
Select Case c
Case 28800 To 64800
trouverCouleur = "Rouge"
Case Else
trouverCouleur = "Bleu"
End Select
Case 6
Select Case c
Case 28800 To 43200
trouverCouleur = "Rouge"
Case Else
trouverCouleur = "Bleu"
End Select
End Select
End Function
donc normalement en placant comme parametres 1 entier [0,6] et un autre y doit m'afficher bleu ou rouge ds une cellule..
et ben non, ca marche po
si qq'un a une idee..
---------------
bière tu fûs ma mére