Discussion :

[jawed]

Bonjour a vous tous
Le code si joint n'atteint pas le nouveau enregistrement si une personne veut me le corriger ce serai aimable de sa part ou a une meilleure idée

Code :

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

1
2
3
4
5
Private sub Modnif_Change()
Forms("F_Bon_Commande").Controls("T_Factures").SetFocus
Forms("F_Bon_Commande").Controls("T_Factures").Form.[Bon de commande].SetFocus
Forms("F_Bon_Commande").Controls("T_Factures").Form.[Bon de commande].GoToRecord,,acNewRec
End Sub

Merci d'avance
Cordialement

[marot_r]

Bonjour.

Utiliser l'événement "sur changement" n'est peut-être pas le meilleur car il se produit à chaque changement même si il est mineur.
Perso je préfére "Après MAJ" qui est plus définitif.

Sinon je te suggère le code suivante :

Code :

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

me.[T_Factures].Form.Recordset.MoveLast

Qui devrait faire ce dont tu as besoin.

A+

[jawed]

Bonjour marot_r
Effectivement en utilisant AprèsMAJ c'est plus définitif merci pour l'idée
Pour votre code il atteint le dernier enregistrement mais pas un nouveau comment y remédier SVP

Cordialement

[hyperion13]

Salut
Essayez ceci
me.[T_Factures].Form.Recordset.AddNew

[jawed]

Merci a vous et a marot_r
Cela fonctionne très bien
Cordialement