Discussion :

[Philippe608]

Bonjour,

Dans un champ de mon formulaire j'ai soit la valeur 1 soit la valeur 2 soit rien "".

Lorsque 1 ou 2 s'affiche je voudrais que mon image apparaisse, au contraire si le champ "valeur" est vide la masquer.
Mon événement est sur après mise à jour d'une liste déroulante, c'est lorsque j'active cette dernière que la valeur passe à 1 ou 2 ou "".
ça fonctionne que dans un sens pas dans l'autre.
Par défaut mon image est sur visible = non.
parfois ma liste est vide.

Merci d'avance.
Philippe

Code :

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

1
2
3
4
5
6
7
8
9
10
Private Sub maliste_AfterUpdate()
If Me.Valeur = 1 Or 2 Then
Me.Image1.Visible = True
Else
If Me.Valeur = Null Then
Me.Image1.Visible = False
End If
Me.maliste.Requery
End If
End Sub

[loufab]

Bonjour,
Avec l'indentation de ton code c'est plus simple à lire. Merci de penser au lecteur !

Donc,
D'une part ceci n'est pas correct :

Code :

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

If Me.Valeur = 1 Or 2 Then

On écrit cela :

Code :

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

If Me.Valeur = 1 Or Me.Valeur = 2 Then

Ensuite

Code :

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

If Me.Valeur = Null Then

Il faut vérifier la valeur que "Valeur" renvoie. Généralement on trouve Null dans un champ qui n'a pas été rempli, par contre si tu veux tester "" ce n'est pas pareil que Null.
Pour tester un champ vide (qui est différent de Null) on utilisera :

Code :

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

if len(me.Valeur)=0 then

Je pense qu'entre ces 2 ajustements tu résoudras ton problème.

Cordialement,

[Philippe608]

Merci pour la réponse.
J'ai bien modifié mais ça ne fonctionne pas, l'image n'est pas invisible si je change la sélection de ma liste, le champ qui affiche 1 ou 2 ou qui reste vide se met à jour automatiquement en activant la liste, il n'est jamais "utilisé" .

Merci,

Bon dimanche.
Philippe

[loufab]

Que représente Valeur ?
Est-il valorisé ?

[Philippe608]

Le champ "valeur" extrait le chiffre 1 ou 2 de la liste qui se trouve côté plusieurs.

Code :

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

=[lstprobleme].[column](3)

le chiffre 1 et 2 sont utilisés seuls.

ils servent à afficher l'image ou non, dans ma liste sur 50 enregistrements seulement 10 ont la valeur 1 ou 2.
1 pour boisson
2 pour viande par exemple.
pour les autres pas de valeur "légume" etc..

mais il y a sans doute une autre solution pour faire disparaitre cette image !

Merci.

[Philippe608]

Et si on utilise

Code :

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

=[lstprobleme].[column](3)

dans le code plutôt que de passer par un champ supplémentaire qui extrait la valeur ?

Je ne sais pas si c'est possible.

Merci.

[loufab]

Passer par Valeur est-il obligatoire ?

Pourquoi ne pas aller droit au but en écrivant :

Code :

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

1
2
3
4
5
if me.lstProbleme.column(3) = 1 Or me.lstProbleme.column(3) = 2 then
   me.image.visible = true
else
   me.image.visible = false
endif

Ou encore plus direct comme :

Code :

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

me.image.visible = (me.lstProbleme.column(3) = 1 Or me.lstProbleme.column(3) = 2)

qui remplace les 5 lignes précédentes.

Mais peut-être que Valeur a une autre utilité ?

[Philippe608]

Bonjour et merci,

ça fonctionne sur réception focus du champ qui contient la valeur après avoir quitté la liste, ça devrait aller comme ça.

Bonne journée,

@+
Philippe