Discussion :

[Scbarbarossa]

Bonjour
J'ai un formulaire de saisi de code qui enregistre sur une table T_donnee sur cet table il y a plusieurs colonne PartID , Description , PO, Qty, Date achat , unité

sur mon formulaire j'ai ajouté des bouton New , supprimer enregistrement , enregistrer mes questions sont :

1- lorsque l'agent va faire le saisi lorsque il passe au dernier champ en utilisant tab ça va enregistrer sans même avoir besoin de cliquer sur le bouton enregistrer donc est ce qu'il y a un moyen d'enregistrer les données saisis qu'en appuyant sur le bouton enregistrer seulement ?

2- après remplissage de tous les données et en appuyant sur le bouton enregistrer est ce qu'il ya un moyen de vider les champs du formulaire façon de dire que votre enregistrement est passé

NB: je suis nul au macro donc si vous avec des suggestions de la sorte veuillez SVP détailler et je serai vraiment très reconnaissant++++


Merci d’avance les amis

[Malick]

1- lorsque l'agent va faire le saisi lorsque il passe au dernier champ en utilisant tab ça va enregistrer sans même avoir besoin de cliquer sur le bouton enregistrer donc est ce qu'il y a un moyen d'enregistrer les données saisis qu'en appuyant sur le bouton enregistrer seulement ?

Il faut afficher le formulaire en mode création. Ensuite dans les propriétés du formulaire, sous l'onglet Autres, définir la ligne Cycle à Enregistrement en cours.

2- après remplissage de tous les données et en appuyant sur le bouton enregistrer est ce qu'il ya un moyen de vider les champs du formulaire façon de dire que votre enregistrement est passé

Pour cela, il faut associer à l'événement Clic du bouton enregistrer le code ci après :

Code :

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

1
2
3
4
5
6
7
 
Private Sub BtnEnregistrer_Click()
    Dim x As String
    DoCmd.Save
    x = MsgBox("Vos données sont bien enregistrées", vbOKOnly, "Information")
    DoCmd.GoToRecord , , acNewRec
End Sub

Cordialement,
Malick

[Scbarbarossa]

Re-bonjour
merci pour le point ça fonctionne correctement



Pour cela, il faut associer à l'événement Clic du bouton enregistrer le code ci après :

Code :

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

1
2
3
4
5
6
7
 
Private Sub BtnEnregistrer_Click()
    Dim x As String
    DoCmd.Save
    x = MsgBox("Vos données sont bien enregistrées", vbOKOnly, "Information")
    DoCmd.GoToRecord , , acNewRec
End Sub

est ce que vous pourriez m<indiquer ou je devrais exactement faire ca comme j<ai dis je suis pas vraiment un connaisseur de macro

Cordialement,
Malick[/QUOTE]

[Malick]

Il faut :

• ouvrir ton formulaire en mode création ;
• cliquer sur le bouton Enregistrer ;
• dans le volet Propriétés, cliquer sur l'onglet Événement
• ensuite sur la ligne Sur clic, choisir Procédure événementielle ;
• et dans la fenêtre de l'éditeur VBA qui s'ouvrira, il faudra coller le code fourni et enregistrer.

Voilà

Si tu n'arrives pas à le faire, tu pourras zipper ta base de données et le poster sur le forum (sans données confidentielles)

Cordialement,
Malick

[Scbarbarossa]

Merci c'est trés gentil a vous

[Malick]

De rien, c'est un plaisir.

À bientôt sur les forums.