Olá pessoal...!!! usei esta dica do forum mais não funcionou !
Este código usa o evento KeyPress do FlexGrid e pega o código ascii da letra pressionada pelo usuário para colocar a primeira linha com esta determinada letra no TopRow; por exemplo; em um grid com muitos registros (e ordenado alfabéticamente) ao se pressionar a tecla "F" (por exemplo) automaticamente o foco é lançado no primeiro registro com a tecla F . . . confira !
===============================================
Private Sub MSFlexGrid1_KeyPress(KeyAscii As Integer)
If Trim(MSFlexGrid1.TextMatrix(1, 1)) <> "" Then
If (KeyAscii > 65 And KeyAscii < 90) _
Or (KeyAscii > 97 And KeyAscii < 122) Then
Dim I As Integer
Dim S As String
Dim X As String
S = Chr(KeyAscii)
S = UCase(S)
For I = 1 To MSFlexGrid1.Rows - 1
X = Trim(MSFlexGrid1.TextMatrix(I, 1))
X = Left(X, 1)
X = UCase(X)
If S = X Then
MSFlexGrid1.TopRow = I
Exit For
End If
Next
End If
End If
End Sub
Preciso fazer uma pesquisa num FlexGrid tipo qdo o usuário digitar a letra selecione o registro q contem o primeira letra da tecla digitada e assim sucessivamente c ele teclar a mesma letra ele mude para o próximo registro igual a um ListView desde já agradeço...!!! abraços...!!!
