Using a Verical Scrollbar to Select Records

[PaultheS]

Hi, I'm using a single form and I'd like to be able to use a scrollbar to scroll down through my records (like when looking at powerpoint slides). A continuous form is not practical in this case. Is there a way to do this?

 

[gol4]

I would thnk something like this would be functional


Private Sub Form_Load()
Me.RecordsetClone.MoveLast
Me.RecordsetClone.MoveFirst
Me.scroll1.Max = Me.RecordsetClone.RecordCount
End Sub

Private Sub scroll1_Updated(Code As Integer)
DoCmd.GoToRecord , , acGoTo, Me.scroll1.value + 1
End Sub