GoToRecord Help!!!!!!

[Kipster1203]

I have an afterupdate code set on a vlue in my form, this afterupdate goes to the following code:

Private Sub Request_Date_AfterUpdate()

    Dim Request_Add As Integer

    Request_Add = Me!Request_Number
    
    Request_Add = Request_Add + 1
    
    Me!Request_Number = Request_Add
    
    DoCmd.Requery
    
    DoCmd.GoToRecord ,,
     
    
    
End Sub

I have to requery in order for the data to be updated, the problem is that the cursor jumps to the first record in the table, and I need it to stay on the record being updated, can anyone fill in the blanks for me?? Thanks

[Kipster1203]

Why doesn't it automatically refresh on the record you are on after the Requery command? instead it goes to the first record.... any way around that?

[Access_Blaster]

Private Sub Request_Date_AfterUpdate()
Me.Requery 
End Sub

Unless I am not understanding your post.


Regards,

Richard

[Kipster1203]

That didn't work, it requeries and jumps back to the first record. I need to stay on the current record.

[evander]

Let's say you have a form called frmKipster, and you have a button in that form...

Private Sub Command10_Click()

Dim lngCurrentRecord As Long
lngCurrentRecord = Me.CurrentRecord

Quantity = Quantity + 5
Me.Requery

DoCmd.GoToRecord acDataForm, Me.Name, acGoTo, lngCurrentRecord

End Sub

Hope this helps.

[evander]

Could you please tell me how you created that grey box in which you put your VBA code? Sorry I couldn't make my own code readable. Kekekeke.

[Kipster1203]

Let's say you have a form called frmKipster, and you have a button in that form...

Private Sub Command10_Click()

Dim lngCurrentRecord As Long
lngCurrentRecord = Me.CurrentRecord

Quantity = Quantity + 5
Me.Requery

DoCmd.GoToRecord acDataForm, Me.Name, acGoTo, lngCurrentRecord

End Sub

Hope this helps.

Click on the pound button in the toolbar I'm confused as to what to out for acDataForm and Me.Name as well as why you even need it. Thanks

[Kipster1203]

I just took the first 2 objects out and it worked!!!! Thanks so much!

[evander]

You're welcome. And thanks for showing me how I can use the pound symbol.