Reiniciar un MSFLEXGRID y cambiar de color una linea

[hernanmdq]

Este codigo lo utilizo para resaltar un flex cuando se da que la columna 7 esta vacia. Tu cambialo por tu condicion, ahi tiene que funcionar.

Código:

Private Sub ResaltarGrid()
    Dim i As Long
    Dim j As Long
    For i = 1 To mshListado.Rows - 1
        mshListado.Col = 7
        mshListado.Row = i
        If mshListado.Text = "" Then
            For j = 0 To mshListado.Cols - 1
                mshListado.Col = j
                mshListado.CellBackColor = RGB(250, 84, 61)
            Next j
        End If
    Next i
    mshListado.Refresh
End Sub