Diviseur d'enregistrement VBA ACCESS

Résolu
shaka17 Messages postés 15 Date d'inscription   Statut Membre Dernière intervention   -  
shaka17 Messages postés 15 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

Je voudrais dans ACCESS 2003 utiliser et afficher les informations du "diviseur d'enregistrement" dans un formulaire.
En effet ce dernier est masqué dans mon formulaire.

Si cela n'est pas possible pouvez vous me dire comment récuperer l'info qui indique si on incremente les enregistrements ou si on décrémente, ceci dans le but de renseigner un simple compteur.

Sachant que j'ai déjà un compteur qui est incrémenté par 2 touches de déplacement (acnext et acprevious) et qui s'affiche dans un champ indépendant dans mon formulaire. Il marche trés bien avec les touches mais si la roulette est actionné il n'est pas incrémenté!

voici le code que j'utilise :
------------------------------------------------------------------------------------------------------------
Private Sub Suivant_Click()

On Error GoTo Err_Suivant_Click

DoCmd.GoToRecord , , acNext
Cpt = Cpt + 1
Cpt_enr = Cpt 'Cpt_enr = affichage dans formulaire

Exit_Suivant_Click:
Exit Sub

Err_Suivant_Click:
MsgBox "Il n'y a pas d'autres installations rattachées à cette machine"
Resume Exit_Suivant_Click

End Sub
------------------------------------------------------------------------------------------------------------
Private Sub Précédent_Click()

On Error GoTo Err_Précédent_Click

DoCmd.GoToRecord , , acPrevious
Cpt = Cpt - 1
Cpt_enr = Cpt

Exit_Précédent_Click:
Exit Sub

Err_Précédent_Click:
MsgBox "Il n'y a pas d'autres installations rattachées à cette machine"
Resume Exit_Précédent_Click


End Sub
------------------------------------------------------------------------------------------------------------

Merci de votre aide

PS : si vous avez une solution plus simple n'hésitez pas! merci
A voir également:

2 réponses

blux Messages postés 27121 Date d'inscription   Statut Modérateur Dernière intervention   3 359
 
Salut,

tu peux utiliser 'currentrecord', il correspond au numéro affiché dans le compteur d'enregistrement

msgbox currentrecord
0
shaka17 Messages postés 15 Date d'inscription   Statut Membre Dernière intervention   1
 
merci beaucoup!

c'est trés simple et ca marche !

Grand merci
0