Discussion :

[nicou50]

J'ai crée une zone de texte de paiement ( dans un sous-formulaire). J'aimerais que l'utilisateur ne puisse effectuer qu'un paiement à la fois. Au chargement du formulaire, je dois être sur un nouvel enregistrement pour pouvoir entrer une nouveau paiement. J'y arrive en sélectionnant en mettant Ajout donnée à Oui et Entrée donnée à Oui dans le formulaire. Seulement lorsque la mise à jour est réalisée lorsque le paiement est effectué, le formulaire se place sur le premier enregistrement. Comment faire pour qu'il reste sur la valeur que je viens d'entrer ? MERCI D'avance

[Faw]

peut-être ici

[nicou50]

Il se trouve que j'ai déjà essayé de jouer avec les commandes DoCmd.GoToRecord ( avec acLast et acNewRec ) ainsi que Me.CadreSousFormulaire.Form.Recordset.MoveLast.
Peut être que j'utilise mal les fonctions

Mon sous-formulaire F_Paiement est basé sur la Table T_Paiement qui contient le numéro du client, le montant du paiement et la date du paiement. F_Paiement se trouve dans le formulaire principal F_Client(basé sur T_Client), qui contient le numéro de client nécessaire (champs père-fils). Les deux tables sont liées avec intégrité référentielle.

C'est toute les informations que je peux donner. Merci de votre aide !!!

[Faw]

bref, le gotorecord doit être mis après les instructions "refresh" et autres "requery" qui te positionnent par défaut sur le premier enregistrement.

Code :

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

DoCmd.GoToRecord , , acLast

tout simplement si tout ceci se passe au niveau du sous formulaire...et que le dernier enreg. saisi est bien le dernier affiché...

suite...
Si depuis le form parent:

Code :

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

1
2
me.lesousform.setfocus
DoCmd.GoToRecord , , acLast

[nicou50]

nope...ca ne marche pas, même après mon Me.Refresh. Ca revient au premier enregristrement à chaque fois.

[nicou50]

suite...
Si depuis le form parent:

Code :

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

1
2
me.lesousform.setfocus
DoCmd.GoToRecord , , acLast

Je pense que je comprends mal comment remplacer les noms...il faut mettre cette ligne de code dans le formulaire parent ( au chargement par exemple, avec Form_Current) et remplacer "lesousform" par mon nom de sous formulaire ?

[nicou50]

J'ai trouvé la solution finalement. Je dois me positionner sur un nouvel enregistrement et ensuite faire

Code :

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

1
2
Me.AllowAdditions = False
DoCmd.GoToRecord , , acLast

Merci quand même du coup de pouce