[ACCESS] ouvrir un formulaire en mode ajout
Résolu
SAYLA
Messages postés
51
Statut
Membre
-
Yazid BALDE -
Yazid BALDE -
Bonjour, je suis débutante, je crais une base de données sous access, je souhaite ouvrir à partir d'un bouton de commande un formulaire "clients" en mode ajout, j'ai fais le code ci-suit en VB mais lorsque j'ouvre mon formulaire je ne peux inscrire aucune information alors que dans les proropriété je peux ajouter :
Private Sub ajouter_client_Click()
On Error GoTo Err_ajouter_client_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "clients"
DoCmd.OpenForm stDocName, , , "[N° client]=" & Me.NewRecord, , acDialog, "GotoNew"
Exit_ajouter_client_Click:
Exit Sub
Err_ajouter_client_Click:
MsgBox Err.Description
Resume Exit_ajouter_client_Click
End Sub
Si quelqu'un pouvait me dépanner, je bloque vraiment là.
Merci d'avance
Private Sub ajouter_client_Click()
On Error GoTo Err_ajouter_client_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "clients"
DoCmd.OpenForm stDocName, , , "[N° client]=" & Me.NewRecord, , acDialog, "GotoNew"
Exit_ajouter_client_Click:
Exit Sub
Err_ajouter_client_Click:
MsgBox Err.Description
Resume Exit_ajouter_client_Click
End Sub
Si quelqu'un pouvait me dépanner, je bloque vraiment là.
Merci d'avance
A voir également:
- [ACCESS] ouvrir un formulaire en mode ajout
- Whatsapp formulaire opposition - Guide
- Comment ouvrir un fichier epub ? - Guide
- Comment ouvrir un fichier bin ? - Guide
- Mode avion - Guide
- Ouvrir un fichier .dat - Guide
5 réponses
Bonjour SAYLA,
Voici une qui va satisfaire votre besoin.
DoCmd.OpenForm StDocName, , , , acFormAdd
Bonne journée
La science ne fait que trouver ce qui existe depsuis toujours.
REEVES Hubert.
Voici une qui va satisfaire votre besoin.
DoCmd.OpenForm StDocName, , , , acFormAdd
Bonne journée
La science ne fait que trouver ce qui existe depsuis toujours.
REEVES Hubert.
slt
Ce que propose Jacques doit marcher ...
La solution est simple : soit tu utilise l'assistant, soit tu place un bouton sur le formulaire, tu selectionne le bouton, tu ouvre la fenetre des Propriétés, cliquez sur l'onglet Evenement, cliquez 2 sois dans la ligne "Sur Clic"
tapez l'instruction suivante : DoCmd.OpenForm "Clients"
Sauvegardez tout, et fermez
puis exécutez
Bonne chance
Ce que propose Jacques doit marcher ...
La solution est simple : soit tu utilise l'assistant, soit tu place un bouton sur le formulaire, tu selectionne le bouton, tu ouvre la fenetre des Propriétés, cliquez sur l'onglet Evenement, cliquez 2 sois dans la ligne "Sur Clic"
tapez l'instruction suivante : DoCmd.OpenForm "Clients"
Sauvegardez tout, et fermez
puis exécutez
Bonne chance
Merci pour la réponse jacques mais ça ne marche pas, lorsque le formulaire s'ouvre il est vierge OK mais je ne peux inscrire aucune donnée à l'intérieur, et pour l'autre solution de tleboukaka ça marche mais ça m'ouvre tous les formulaires alors que je veux ouvrir un formulaire vierge. Auriez-vous une autre solution ?
Merci
Merci
ok j'ai trouver mon erreur, ça marche ! je voulais que les données soient saisies en capital alors dans les proriétés Masque de saisie, j'avais mis >. ça me bloqué l'écriture du champ.
Je vous remercie beaucoup pour votre aide et merci de m'avoir répondu rapidement.
Je vous remercie beaucoup pour votre aide et merci de m'avoir répondu rapidement.
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
les marches a suivre
et je te conseil de ne pas utiliser l'adrresse
Declarations
Dim db as DAO.database
di rs as DAO.Recordset
Affectations
Set rs=
Set db = currentDb
cad la base sur la kel on travail
Instruction a utiser:
Docmdmulaire
Docmd.openForm,"nomfor", acNormal
end sub
mais tu purra aussi utilser MsgBox au debut de la declration
vois si sa marche
et je te conseil de ne pas utiliser l'adrresse
Declarations
Dim db as DAO.database
di rs as DAO.Recordset
Affectations
Set rs=
Set db = currentDb
cad la base sur la kel on travail
Instruction a utiser:
Docmdmulaire
Docmd.openForm,"nomfor", acNormal
end sub
mais tu purra aussi utilser MsgBox au debut de la declration
vois si sa marche
