this is what i did to prevent the scrolling with
Me.DataEntry and Me.AllowAdditions
If there no data or adding a new record, this will prevent you from scrolling
to other records
Me.DataEntry = True
Me.AllowAdditions = True
If editing or viewing previous record, this will prevent you from scrolling
to other or new records
Me.DataEntry = False
Me.AllowAdditions = False