Resaltar registro buscado
Publicado por aguila (64 intervenciones) el 12/03/2004 02:35:48
Hola Muchachos:
Tengo un formulario del tipo vista hoja de datos con 20 registros, lo que quiero es que cuando lo abra me resalte con algun color el registro completo donde idAtleta = 2.
El codigo abajo funciona ok, lo que falta es como resaltarlo.
Gracias de antemano por cualquier orientacion al respecto.
Saludos.
Dim cadNombreBúsqueda As String
Set rst = Me.RecordsetClone
cadNombreBúsqueda = Str(2)
rst.FindFirst "IdAtleta = " & cadNombreBúsqueda
If rst.NoMatch Then
MsgBox "Registro no encontrado "
Else
MsgBox "Registro encontrado "
'Me.Bookmark = rst.Bookmark
End If
rst.Close
Tengo un formulario del tipo vista hoja de datos con 20 registros, lo que quiero es que cuando lo abra me resalte con algun color el registro completo donde idAtleta = 2.
El codigo abajo funciona ok, lo que falta es como resaltarlo.
Gracias de antemano por cualquier orientacion al respecto.
Saludos.
Dim cadNombreBúsqueda As String
Set rst = Me.RecordsetClone
cadNombreBúsqueda = Str(2)
rst.FindFirst "IdAtleta = " & cadNombreBúsqueda
If rst.NoMatch Then
MsgBox "Registro no encontrado "
Else
MsgBox "Registro encontrado "
'Me.Bookmark = rst.Bookmark
End If
rst.Close
Valora esta pregunta
0