Conservar registro con Requery en Access 2000

[simpletrece]

Hola a todos,

A ver si alguien puede echarme una mano con una historia de Access 2000.

El caso es que cuando hago un requery de un formulario pierdo el registro actual que tengo seleccionado, se coloca directamente en el primero. Me gustaría saber como puedo volver a posicionarlo en el registro seleccionado antes de refrescar.

Muchas garcias

saludos

[simpletrece]

Hola,

He encontrado una posible forma, pero obliga a que el primer campo del formulario sea único


Public Sub REK(frm As Form)

Dim a As Variant
Dim campo As String

a = frm.Recordset(0)
frm.Requery

With frm.RecordsetClone
campo = .Fields(0).Name
.FindFirst campo & " = " & a
If Not .NoMatch Then
frm.Bookmark = .Bookmark
End If
End With

[dfdiaza]

Hola.. Mira yo tuve el mismo problema tuyo... y la unica solución q pude encontrar y q hasta su momento me sirvio de manera satisfactoria fue usando la propiedad CurrentRecord...
Q me dice el numero del registro actual...

Antes de hacer el requery grabas en una variable el Currentrecord, luego haces el requery, y por ultimo puedes desplazarte de nuevo al registro en q estabas...

el codigo seria mas o menos asi:

variable= [CurrentRecord] ' guardamos numero del registro actual
Formulario.ReQuery ' actualizamos
DoCmd.GoToRecord , , acGoTo, variable

De esta forma volvera al registro en el q estabas...

Ojala te sirva!!! Suerte