Discussion :

[Amanck]

Bonjour,

je souhaiterais savoir quel code entrer pour modifier un champ en fonction d'un autre champ.
En plus clair (je l'espère ) : je rentre des données dans un formulaire dans lequel j'ai X champs. Tous ou presque sont des menus déroulants avec une liste prédéfinie. Je voudrais, lorsque je sélectionne la valeur "Aucune" dans le champ1, que le champ2 prenne la valeur "0", le champ3, la valeur "vide" ...

Actuellement, je sélectionne manuellement toutes ces valeurs, mais comme je suis fainéant , ça m'arrangerait bien d'automatiser tout ça.

Merci d'avance pour votre aide

[fscli]

fais un case sur l'evenement apres MAJ de ta premiere liste qui définira la valeur des suivantes
tu le fais une fois pour tous tes cas après t'es tranquille

[Amanck]

Salut et merci pour ta réponse rapide.

J'ai juste un petit problème : je ne suis pas sûr d'avoir bien compris ta réponse (je suis plutôt novice et je ne sais pas ce qu'est un "case").

De mon côté, j'ai testé plusieurs choses et je suis arrivé au code suivant :

Code :

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

1
2
3
4
5
6
7
8
9
10
 
1 Private Sub Serum1_Lieu_AfterUpdate()
2
3 If Forms!Etat2!Serum1_Lieu.Value = "Aucun" Then
4     Forms!Etat2!Serum1_TypeBoite.Value = "Aucun"
5     Forms!Etat2!Serum1.Value = "Vide"
6     Forms!Etat2!Serum1_quantite(µl).Value = "0"
7 End If
 
8 End Sub

En fait, jsuqu'à la ligne 5, ça marche bien, mais pour la ligne 6; j'ai le message d'erreur suivant :

Erreur d'exécution 451 :
La procédure Property Let n'est pas définie et la procédure Property Get n'a pas renvoyé d'objet.

Bon, en attendant de résoudre ce bug, je n'ai maintenant plus qu'un champ à saisir. Il y a déjà du mieux ...

Merci encore pour votre aide.

[DavidDeTroyes]

Moi j'utiliserai l'evenement Change et la fonction AddItem...

[Amanck]

En fait, jsuqu'à la ligne 5, ça marche bien, mais pour la ligne 6; j'ai le message d'erreur suivant :

Citation:
Erreur d'exécution 451 :
La procédure Property Let n'est pas définie et la procédure Property Get n'a pas renvoyé d'objet.

Il semblerait que ce soient les parenthèses dans le nom de la variable qui posent problème.

DavidDeTroyes
Moi j'utiliserai l'evenement Change et la fonction AddItem...

Merci pour le tuyau. Je vais essayer.

[Dolphy35]

Salut,

je suis également de ton avis les parenthèses sont surement de trop :

Code :

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

Forms!Etat2!Serum1_quantite(µl).Value = "0"

[Amanck]

Merci pour tous vos conseils.

Je pense avoir maintenant suffisamment de données pour me débrouiller et clore le sujet.

C'est toujours un plaisir de venir sur ce site pour obtenir de l'aide. Les intervenants sont vraiment très cool et très patients avec les débutants (qui ne savent pas toujours où trouver des réponses à des questions souvent très simples ).

Merci encore à tous.

(Dolphy35, je viens de parcourir ton site et je l'ai mis dans mes favoris. Une source d'infos supplémentaire pour Access).