MSFlexGrid

[bk_820609]

ya lo encontre pero me marca un error---porque?
Private Sub flex_Click()
With msfgFechas
If flex.Row <> flex.RowSel Then
flex.Row = flex.RowSel

'con estas dos lineas de codigo se selecciona la fila completa con lo que no es necesario que lo pongas
flex.Col = 0
flex.ColSel = flex.Cols - 1
End If
End With
End Sub
------
Private Sub flex_DblClick()

'Text1.Text = MSFlexGrid.TextMatrix(columna, fila)
Nombre.Text = flex.TextMatrix(flex.Row, flex.Col)
ApPat.Text = flex.TextMatrix(flex.Row, flex.Col + 1)
ApMat.Text = flex.TextMatrix(flex.Row, flex.Col + 2)


End Sub