Discussion :

[CroqueMr]

Bonjour à tous
J'ai un petit soucis sur mes boutons de navigation sur un formulaire. Il comporte 3 sous formulaire imbriqué les uns dans les autres pour naviguer entre les différents niveau de l’arborescence.

Je suis un peu debutant je ne sais pas s'il y a mieux pour faire ça, mais la navigation fonctionne.
Je veux faire disparaitre les boutons suivant et precedent quand j'ai aucun enregistrement après.

j'ai mis le code suivant dans chacuns des trois formulaires avec les boutons adéquats

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
Private Sub Form_Current()
Me.btnSuivantN3.Visible = (Me.CurrentRecord < Me.Recordset.RecordCount)
Me.btnPreN3.Visible = (Me.CurrentRecord > 1)
End Sub

Pour les boutons précedent, ça fonctionne parfaitement sur les 3 niveaux.
Cependant sur le bouton suivant, ça le fait disparaître en permanence pour les niveau 2 et 3 alors que pour le 1 ça marche parfaitement.
J'ai mis le code

Pour essayer de debugger les boutons j'ai mis un msgbox qui me donne la valeur Me.CurrentRecord et Me.Recordset.RecordCount il me donne 1 pour les deux quand je viens de passer à un autre enregistrement sur le niveau supérieur, et quand j'attends un peu, il me donne le bon nombre de recordcount, le comptage n'est donc pas instantané.
Peut etre que je mets le code pas au bon endroit, ou peut etre qu'il y a plus simple pour se déplacer dans l'arborescene et le faire avec 1 formulaire au lieux de 3
Merci à vous, je joins deux screen.