Bonjour à tous,

je cherche a réaliser un affichage avec défilement vertical des enregistrements d'un sous formulaire continu basé sur une requete d'affichage de la liste des défunts selon le mois actuel.
J'ai essayé ce code mais cela fait sauter d'un enregistrement à l'autre. C'est trop saccadé. je cherche un défilement continu plus agréable à regarder.
J'ai chercher mais je ne vois pas comment le faire.
je vous remercie pour toutes les suggestions que vous pourriez me soumettre.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
Private Sub Form_Timer()
 If IsNull(Nomdefunt.Value) Or Nomdefunt.Value = "" Then
     GoTo endfin
   Else
     DoCmd.GoToRecord , affichdefuntssousfrm, acNext
 
     If IsNull(Nomdefunt.Value) Or Nomdefunt.Value = "" Then
       DoCmd.GoToRecord , affichdefuntssousfrm, acFirst
     End If
 
  End if
endfin:
End Sub