Discussion :

[dominux80]

Bonjour,

Je voudrai changer la couleur de text d'une cellule mshflexigrid en fonction d'un critère.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
 If rsMaDb!qte_stock < rsMaDb!seuil_alerte Then
 
        MSHFlexGrid.Refresh
        MSHFlexGrid.Col = 4
        MSHFlexGrid.CellForeColor = &HFF&
    rsMaDb.MoveNext
    End If

Là il m'affiche bien le 1er touvé en rouge, mais si je fais une boucle do until, rien ne se passe, ni même un do while.
Auriez-vous une idée

Merci

[Phifi]

Bonjour,

Il faut indiquer sur quelle ligne tu changes la couleur :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
 
 If rsMaDb!qte_stock < rsMaDb!seuil_alerte Then
 
        MSHFlexGrid.Refresh
        MSHFlexGrid.Col = 4
        MSHFlexGrid.Row = ?
        MSHFlexGrid.CellForeColor = &HFF&
    rsMaDb.MoveNext
   End If

[zazaraignée]

Là il m'affiche bien le 1er touvé en rouge, mais si je fais une boucle do until, rien ne se passe, ni même un do while.

On peut la voir cette boucle Until ?