Cita:
Iniciado por vpino 
Hola a todos. alguien sabe como poner color a las lineas de un flexgrid? he intentado pero el color lo pone a todo el flexgrid y no consigo que sea por linea y me gustaria tener mi flexgrid en colores.
hasta pronto.
Prueba con este codigo me avisas si te ayuda.
Private Sub MSFlexGrid1_MouseUp(Button As Integer, Shift As Integer, x As Single, y As Single)
PintaCelda
End Sub
Private Sub MSFlexGrid1_SelChange()
PintaCelda
End Sub
Sub PintaCelda()
Dim xColumna As Integer
Dim xRegistro As Integer
xColumna = MSFlexGrid1.Col
xRegistro = MSFlexGrid1.Row
For f% = 0 To MSFlexGrid1.Rows - 1
MSFlexGrid1.Row = f%
If f% > 0 Then
For i% = 0 To MSFlexGrid1.Cols - 1
If i% > 0 Then
MSFlexGrid1.Col = i%
MSFlexGrid1.CellBackColor = vbWhite
End If
Next
End If
Next
MSFlexGrid1.Col = xColumna
MSFlexGrid1.Row = xRegistro
MSFlexGrid1.CellBackColor = vbYellow
End Sub
Juan Carlos