Could I populate a grid changing the color of rows depending on contents?
Printable View
Could I populate a grid changing the color of rows depending on contents?
Private Sub Data1_Reposition()
Dim i As Integer
For i = 1 To MSFlexGrid1.Rows - 1
MSFlexGrid1.Col = 2
MSFlexGrid1.Row = i
If CCur(MSFlexGrid1.Text) > 100 Then
MSFlexGrid1.CellForeColor = vbRed
End If
Next i
MSFlexGrid1.Col = 0
MSFlexGrid1.Row = 0
End Sub
Iouri Boutchkine
[email protected]