Customised buttons

[panteraboy]

Hi there i have been deeply frustated as last week trying to figure out how to cycle through records on a form based on a query by using images instead of command buttons . I have a customised view next and previous button. the buttons work until they go out of bounds. I am trying for example to bring the user back to the first record if the user is about to go out of the records range by pressing the next button and to the last record if the user presses the previous button and is about to go past the first record. I am only a novice user and have been playing around with recordset still me fingers have blisters. Can anyone please help me or point me in the right direction.

[missinglinq]

I use this code for these navigation buttons. My forms are always set up with AllowAdditions set to No (I use a custom Add button as well) so at the end of the recordset Access errors out and triggers the code. You'll need to change the button names with your own, of course.

Private Sub Go2Next_Click()

On Error GoTo Err_Go2Next_Click

DoCmd.GoToRecord , , acNext

Exit_Go2Next_Click:

Exit Sub

Err_Go2Next_Click:

If Err.Number = 2105 Then

DoCmd.GoToRecord , , acFirst

Else

MsgBox Err.Description
Resume Exit_Go2Next_Click

End If

End Sub

Private Sub Go2Prev_Click()
On Error GoTo Err_Go2Prev_Click

DoCmd.GoToRecord , , acPrevious 

Exit_Go2Prev_Click:

Exit Sub

Err_Go2Prev_Click:

If Err.Number = 2105 Then

DoCmd.GoToRecord , , acLast

Else

MsgBox Err.Description
Resume Exit_Go2Prev_Click

End If

End Sub

Welcome to bytes!

Linq ;0)>

[panteraboy]

thank you so much my head was wrecked. tried about 20 different variations including recordsets. Though it would be a lot harder to do. Im still learning lol

[missinglinq]

Glad we could help!

Linq ;0)>