Discussion :

[spacesheep]

Bonjour Tout le monde d^_^b

Voici ma question du jour (ou problème du jour comme bon vous semble)

Comment faire pour récupérer la valeur d'une zone de liste déroulante pour la copier dans une zone de texte lors de la saisie d'une autre zone de texte?
Et Comment récupérer les valeurs de la ligne sélectionner du sous-formulaire pour les affecter au zone de texte concerné pour une éventuelle modification de cette ligne?

Je vais expliquer un peu la chose.

j'ai un formulaire frm_modele qui contient des zones texte qui sont: num_modele, nom_modele, num_marque et date.
une zone de liste déroulante zl_marque qui affiche les marques (nokia, sagem,...)
et un sous-formulaire sfrm_req_modele qui affiche la requête req_modele selon la sélection de zl_marque a l'aide de ce code

Code :

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

Comme [Formulaires]![frm_modele]![zl_marque]

qui est dans les critères de la requête de la colone num_marque de req_modele qui affiche nom_marque, nom_model et date.

Comment récupérer la valeur de zl_marque (ex:nokia) qui se copie dans num_marque lorsque je saisi dans nom_modele?

Et après comment récupérer les valeurs de la ligne sélectionné dans sfrm_req_modele dans les zone texte concerné pour une éventuelle modification?

Je vous remercie par avance pour l'aide que vous allez m'apparter

remarque: je veux éviter d'utiliser le source contrôle de zl_marque avec la valeur num_marque. Car ca me créé une nouvelle page.

[spacesheep]

j'ai mis se bout de code qui me permet de récupérer la valeur sélectionner de zl_marque en msgbox.

Code :

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

1
2
3
4
5
Private Sub nom_modele_AfterUpdate()
 
MsgBox Me.zl_marque.Column(0)
 
End Sub

est ca fonctionne.


j'ai essayé ce code pour mettre la valeur désiré dans la zone texte num_marque

Code :

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

Me.num_marque.Caption = Me.zl_marque.Column(0)

est ca ne fonctionne pas

Comment copier cette valeur directement dans la zone de texte num_marque
après la saisi de nom_modele?

Merci de votre aide

[FreeAccess]

Bonjour,

Quand tu as une erreur sur du code VBA, il est bon de nous mettre le type d'erreur retournée...

Sinon, juste pour commencer.....je pense que ton contrôle 'num_marque' est une zone de texte.....donc utilise la bonne propriété:
Caption pour un label
Value pour une zone de texte

[spacesheep]

C'est bon j'ai trouvé mon bout de code pour pouvoir copier la valeur selon zl_marque dans num_marque.

Code :

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

1
2
3
4
5
Private Sub nom_modele_AfterUpdate()
 
num_marque = zl_marque.Column(0)
 
End Sub

Je vais me pencher sur mon 2eme problème maintenant ^^.

De récupérer les valeurs de la ligne sélectionner du sous-formulaire pour les copier dans les zone de texte concerner pour une éventuelle modification.

[FreeAccess]

ceci est quand même plus correct:

Code :

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

me.num_marque.Value = me.zl_marque.column(0)

...récupérer les valeurs de la ligne sélectionner du sous-formulaire pour les copier dans les zone de texte concerner pour une éventuelle modification.

Je ne comprends pas vraiment ta façon de procéder...

Pourquoi récupérer des données qui existe déjà dans ton SF pour les copier dans les contrôles contenus dans ton formulaire...

Si tu modifie les valeurs de tes différents champs contenus dans ton SF, cela reviendra au même...

En clair, ton formulaire peut aussi bien servir à la visualisation et/ou à la modification et/ou ajout de données.....

[spacesheep]

heu....
Je crois que c'était plutôt pour me prendre bien le chou...
Les modifications désiré peuvent se faire directement via le sous-formulaire ca sera plus rapide et moins prise de tête surtout lol

En tout cas merci FreeAccess