Bonjour,
Je suis les étapes du livre VBA Access 2013 Créez des applications.
On me donne un module avec lequel je dois écrire une déclaration du type
Module1:
Ensuite un formulaire1
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14 Option Compare Database Option Explicit '2.3.1 : Créer le type utilisateur Public Type Salarié Nom As String Prénom As String NumSécu As String End Type
et finalement un formulaire2
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13 Option Compare Database Option Explicit '2.3.2 : Utiliser le type Salarié Private Sub cmdEnregistrer_Click() udtSalarié.Nom = txtNom.Value udtSalarié.Prénom = txtPrénom.Value udtSalarié.NumSécu = txtSécu.Value DoCmd.OpenForm ("Formulaire2") End Sub
Le problème : Quand je clique sur Enregistrer , il y a une erreur de compilation. J'ai vérifié plusieurs fois mes écritures et je ne vois pas l'erreur. Merci
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 Option Compare Database Option Explicit Private Sub Form_Load() lblNom.Caption = udtSalarié.Nom lblPrénom.Caption = udtSalarié.Prénom lblSécu.Caption = udtSalarié.NumSécu End Sub
Partager