Discussion :

[Ghis7]

Bonjour,

je dois utilisé un type utilisateur dans un module qui sera enregistrer dans Formulaire2 et copier directement dans le Formulaire3.
Dois-je utiliser les étiquettes ou bien des zones textes dans Formulaire3 ?

Mon formulaire2 : 3 zones de textes - Nom - Prenom - N°SS



Mon formulaire3 : j'ai mis 3 étiquettes ( couleur verte ) qui doivent récupérer le type utilisateur du module, enregistrer dans le formulaire2





module2 : le type défini




Formulaire2 : le code

Code :

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

1
2
3
4
5
6
7
8
9
10
11
Private Sub CmdEnregistrer_Click()
udtSalarie.Nom = TexteNom.Value
udtSalarie.Prenom = TextePrenom.Value
udtSalarie.NumSecu = TexteNumSecu.Value
DoCmd.OpenForm ("Formulaire3")
End Sub
 
 
Private Sub CmdQuitter_Click()
DoCmd.Close
End Sub

Formulaire3 : le code

Code :

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

1
2
3
4
5
6
7
8
9
10
Private Sub CmdFermer_Click()
DoCmd.Close
End Sub
 
 
Private Sub Form_Load()
lblNom.Caption = udtSalarie.Nom
lblPrenom.Caption = udtSalarie.Prenom
lblsecu.Caption = udtSalarie.NumSecu
End Sub

Quand je vais sur le formulaire2 et que je clic sur enregistrer voici le message :






il me semble que le type du module n'est pas pris en compte ???



voici l'arborescence

le type défini est dans le module2 :

[micniv]

Elle se trouve où et sous quelle forme la déclaration de usdtSalarie ?

Rép : Elle devrait être dans un module standard et déclaré Public

[Ghis7]

dans cette exercice pour moi udtSalarie.Nom fait appelle au type définit dans le module2 en public comme dans le code.

Code :

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

1
2
3
4
5
Public Type Salarie
Nom As String
Prenom As String
NumSecu As String
End Type

ce que je ne comprends pas c'est comment on peut appelé le type d'un Module que l'on crée dans une zone de texte d'un formulaire?


voici les propriétés du module2 :





udtSalarie.Nom
udtSalarie.Prenom
UdtSalarie.NumSecu

sont juste definit dans le CmdEnregistrer_Click() !

[micniv]

alors dans module 2, pour l'instant tu n'as créé que le type, reste à créer la déclaration de udtSalarie en utilisant ce type

Code :

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

1
2
3
4
5
6
7
8
Public Type Salarie
Nom As String
Prenom As String
NumSecu As String
End Type

public udtSalarie as Salarie

[Ghis7]

Merci pour ta réponse qui a permis de trouver l'erreur. effectivement dans le Module2 il suffit de rajouter la déclaration: public udtSalarie as Salarie

voici le code complet :

Code :

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

1
2
3
4
5
6
7
Public Type Salarie
Nom As String
Prenom As String
NumSecu As String
End Type
 
Public udtSalarie As Salarie

le formulaire2 :



le formuaire3 :



les données sont copier du formulaire2 dans le formulaire3