Bonjour à tous.
Pour parcourir les enregistrements d'une table à l'aide d'un formulaire,
j'utilise :
DoCmd.GoToRecord , , acPrevious
DoCmd.GoToRecord , , acNext
mais comment faire pour atteindre l'enregistrement
situé au 4ème rang avant ou après l'enregistrement en cours ?
Très naïvement, l'ai fait :
DoCmd.GoToRecord , , acPrevious
DoCmd.GoToRecord , , acPrevious
DoCmd.GoToRecord , , acPrevious
DoCmd.GoToRecord , , acPrevious
sans succès !!!
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
jero
Salut, QqChose comme.... 1-Précédent : Private Sub btPrécédent_Click() On Error GoTo AllerPremier DoCmd.GoToRecord , , acPrevious, 4 Exit Sub AllerPremier: DoCmd.GoToRecord , , acFirst End Sub
2-Suivant : Private Sub btSuivant_Click() On Error GoTo AllerDernier DoCmd.GoToRecord , , acNext, 4 Exit Sub AllerDernier: DoCmd.GoToRecord , , acLast End Sub
3-Note : C'est expliqué dans l'aide.... A+ "Paul Florent" a écrit dans le message de news:
Bonjour à tous. Pour parcourir les enregistrements d'une table à l'aide d'un formulaire, j'utilise : DoCmd.GoToRecord , , acPrevious DoCmd.GoToRecord , , acNext mais comment faire pour atteindre l'enregistrement situé au 4ème rang avant ou après l'enregistrement en cours ?
Très naïvement, l'ai fait : DoCmd.GoToRecord , , acPrevious DoCmd.GoToRecord , , acPrevious DoCmd.GoToRecord , , acPrevious DoCmd.GoToRecord , , acPrevious sans succès !!!
Merci par avance pour vos bonnes réponses Paul
Salut,
QqChose comme....
1-Précédent :
Private Sub btPrécédent_Click()
On Error GoTo AllerPremier
DoCmd.GoToRecord , , acPrevious, 4
Exit Sub
AllerPremier:
DoCmd.GoToRecord , , acFirst
End Sub
2-Suivant :
Private Sub btSuivant_Click()
On Error GoTo AllerDernier
DoCmd.GoToRecord , , acNext, 4
Exit Sub
AllerDernier:
DoCmd.GoToRecord , , acLast
End Sub
3-Note : C'est expliqué dans l'aide....
A+
"Paul Florent" <paul@florent.com> a écrit dans le message de news:
uGtlNd84KHA.980@TK2MSFTNGP04.phx.gbl...
Bonjour à tous.
Pour parcourir les enregistrements d'une table à l'aide d'un formulaire,
j'utilise :
DoCmd.GoToRecord , , acPrevious
DoCmd.GoToRecord , , acNext
mais comment faire pour atteindre l'enregistrement
situé au 4ème rang avant ou après l'enregistrement en cours ?
Très naïvement, l'ai fait :
DoCmd.GoToRecord , , acPrevious
DoCmd.GoToRecord , , acPrevious
DoCmd.GoToRecord , , acPrevious
DoCmd.GoToRecord , , acPrevious
sans succès !!!
Salut, QqChose comme.... 1-Précédent : Private Sub btPrécédent_Click() On Error GoTo AllerPremier DoCmd.GoToRecord , , acPrevious, 4 Exit Sub AllerPremier: DoCmd.GoToRecord , , acFirst End Sub
2-Suivant : Private Sub btSuivant_Click() On Error GoTo AllerDernier DoCmd.GoToRecord , , acNext, 4 Exit Sub AllerDernier: DoCmd.GoToRecord , , acLast End Sub
3-Note : C'est expliqué dans l'aide.... A+ "Paul Florent" a écrit dans le message de news:
Bonjour à tous. Pour parcourir les enregistrements d'une table à l'aide d'un formulaire, j'utilise : DoCmd.GoToRecord , , acPrevious DoCmd.GoToRecord , , acNext mais comment faire pour atteindre l'enregistrement situé au 4ème rang avant ou après l'enregistrement en cours ?
Très naïvement, l'ai fait : DoCmd.GoToRecord , , acPrevious DoCmd.GoToRecord , , acPrevious DoCmd.GoToRecord , , acPrevious DoCmd.GoToRecord , , acPrevious sans succès !!!