VB et couleurs de cellule

KTY -  
 Thor -
Bonjour à tous,

je développe en VB 6.0 et je recherche le code permettant de colorier l'arrière plan d'une cellule d'un tableau en fonction de la valeur texte de cette cellule.
J'utilise l'instruction suivante mais ca ne marche pas , pouvez vous m'aider s'il vous plait ?

if tab.text = "OK" then
tab.BackColorSel = QBColor(2)
end if

Merci d'avance.
A voir également:

1 réponse

Thor
 
Tout dépend du contrôle que tu utilises. Dans le cas d'un ms flexgrid (celui que j'utilise pour ca simplicité d'utilisation), tu dois d'abord donner la position de la cellule:

Imanginons que tu aies un tableau 4x4.
si tu veux mettre du texte dans la cellule (3,2), tu peux utiliser la fonction:
tab.textmatrix(3,2)="Texte"
l'utilisation de cette fonction ne sélectionne pas pour autant cette case. Tu ne peux donc changer la couleur de cette case. Si tu veux mettre un texte dans cette cellule et la coloriée en fonction de ton texte:

with tab
.row=3
.col=2
.cellbackcolor= iif(.text="OK",QBColor(2) ,<valeur longue de la couleur par défaut>)
end with

la syntaxe n'est peut etre pas identique d'un controle à l'autre, mais la logique reste normalement.
0