Loop records when manually tabbing through a subform

[russianthistle]

I have a subform that holds additional data about a department, with command buttons to cycle forward and backwards to see more data. When the user clicks through to the end of the data, if they click the next command button again, a pop up opens that says "You can't go to the specified record." Is there a way to change the subform, so that it loops back to the beginning again?

[ranman256]

the record controlers (at the bottom) already do this:
<< : 1st record
< : previous record
> : next record
>> : last record
* : new record

[russianthistle]

ranman, yes, I do see that as an option, but with my end users we are looking for a larger, easier to use button. Thanks

[davegri]

See if you can adapt this...

Private Sub cmdNext_Click()
    On Error GoTo cmdNext_Click_Error
    DoCmd.GoToRecord , "", acNext
cmdNext_Click_EXIT:
    Exit Sub
cmdNext_Click_Error:
    Select Case Err
        Case 2105
            DoCmd.GoToRecord , , acFirst
            Resume Next
        Case Else
            MsgBox Err.Number & ", " & Err.Description
    End Select
    Resume cmdNext_Click_EXIT
End Sub