Bouton enregistrement dans formulaire Access
Résolu/Fermé
KantinT
Messages postés
44
Date d'inscription
mardi 19 avril 2011
Statut
Membre
Dernière intervention
1 juillet 2011
-
19 avril 2011 à 15:40
Sé_Sé Messages postés 14 Date d'inscription mercredi 16 octobre 2013 Statut Membre Dernière intervention 3 février 2017 - 14 janv. 2015 à 11:11
Sé_Sé Messages postés 14 Date d'inscription mercredi 16 octobre 2013 Statut Membre Dernière intervention 3 février 2017 - 14 janv. 2015 à 11:11
A voir également:
- Access bouton ajouter enregistrement
- Comment ajouter quelqu'un sur facebook sans le bouton ajouter - Guide
- Ajouter un compte gmail - Guide
- Ajouter signature word - Guide
- Telecharger studio d'enregistrement rap - Télécharger - Édition & Montage
- Ajouter liste déroulante excel - Guide
2 réponses
Bonjour
Voici le code d'un bouton que j'utilise pour effectuerun nouvel enregistrement.
Private Sub Btn_OpenFormRen_Click()
On Error GoTo Err_Btn_OpenFormRen_Click
Dim stDocName As String
'Ferme et ouvre le formulaire pour chaque renouvellement
Dim stLinkCriteria As String
DoCmd.Close
stDocName = "Nomdu formulaire"
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_Btn_OpenFormRen_Click:
Exit Sub
Err_Btn_OpenFormRen_Click:
MsgBox Err.Description
Resume Exit_Btn_OpenFormRen_Click
End Sub
Voici le code d'un bouton que j'utilise pour effectuerun nouvel enregistrement.
Private Sub Btn_OpenFormRen_Click()
On Error GoTo Err_Btn_OpenFormRen_Click
Dim stDocName As String
'Ferme et ouvre le formulaire pour chaque renouvellement
Dim stLinkCriteria As String
DoCmd.Close
stDocName = "Nomdu formulaire"
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_Btn_OpenFormRen_Click:
Exit Sub
Err_Btn_OpenFormRen_Click:
MsgBox Err.Description
Resume Exit_Btn_OpenFormRen_Click
End Sub
KantinT
Messages postés
44
Date d'inscription
mardi 19 avril 2011
Statut
Membre
Dernière intervention
1 juillet 2011
2
27 avril 2011 à 08:45
27 avril 2011 à 08:45
Merci beaucoup ça marche tout à fait.
14 janv. 2015 à 11:11
Merci castours.