Enregistrement sélectionné en limite supérieure du sous formulaire

Bonjour,
Existe t il un moyen de forcer le scrolling d'un sous formulaire pour que l'enregistrement sélectionné soit toujours situé en limite supérieur du sous formulaire ?

Merci par avance pour votre aide.

Bonsoir,
ce code positionne l'enregistrement sélectionné en début de page :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16

Dim lgCur As Long Dim lgMax As Long Dim lgSf As Long ' Nombre de lignes affichées dans le sous-formulaire lgSf = 6 ' Ligne sélectionnée lgCur = Me.CurrentRecord   If Me.CurrentRecord + lgSf > Me.Recordset.RecordCount Then lgMax = 1 Else lgMax = lgCur + lgSf End If   DoCmd.GoToRecord acActiveDataObject, , acGoTo, lgMax DoCmd.GoToRecord acActiveDataObject, , acGoTo, lgCur

---

la variable lgSf correspond au nombre de lignes affichées dans une page complète du sous-formulaire.
A modifier et tester pour savoir si cela correspond à ton besoin...

Bonsoir et merci pour votre réponse !
Je vais tester cela dés lundi !

Bonjour !

Votre code correspond à ce que je voulais ! :ccool:

Merci beaucoup pour votre aide !