Discussion :

[harry226h]

Bonjour
Je sollicite votre aide pour la résolution de mon problème.

En fait a partir d'une listbox j'ouvre un formulaire avec open arg.
L'ouverture des formulaires se fait normalement avec la valeur open arg.
Le problème qui se pose est que même lorsque ma listbox est vide Open arg garde la dernière valeur, ce qui est embêtant.

Comment puis je résoudre ce problème? Rendre Open arg null si ma listbox se vide?

Merci pour votre aide

Cordialement

[marot_r]

Bonjour.

Peux-tu poster le code que tu utilises pour l'ouverture du formulaire ?

A+

[harry226h]

Bonjour Marot
merci pour l’intérêt, ci-dessous le code :

Code :

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

DoCmd.OpenForm "frmInscription", acNormal, , , , , Me.txtCode

[tee_grandbois]

bonsoir,
quand on te demande de poster le code, il faut poster TOUT le code (c'est à dire de Private ... jusqu'à End Sub)
car on ne sait pas si Me.txtCode est la listbox ou si c'est un autre champ.
A priori, une listbox vide renvoie nul, donc le problème ne devrait pas se poser: si Me.TxtCode est nul, Openargs le sera aussi ...

[harry226h]

Désolé
Ci-dessous le code entier :

Code :

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

1
2
3
Private Sub Commande0_Click()
DoCmd.OpenForm "frmInscription", acNormal, , , , , lstInscrit
End Sub

Lorsque la listbox se vide openarg garde la dernière valeur mais lorsque je ré-ouvre le formulaire open arg renvoi nul.

[marot_r]

Bonjour.

Étrange.

Essaye en mettant :

Code :

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

me.lstInscrit=null

à la fin du code qui vide la liste.

A+

[tee_grandbois]

bonjour,

Bonjour.

Étrange.

je trouve cela étrange aussi, mais il y a probablement une information qui nous échappe ...
Une précision: de quelle manière vides-tu la liste ?
Car j'ai essayé des 2 façons: en effaçant la valeur avec la touche Suppr et en utilisant la barre d'espace, les 2 manières me renvoient Null lorsque je fais un Debug.Print

[harry226h]

harry.zip

Ci-joint une fichier illustratif.

La listbox affiche les enregistrement avec le statut "actif".
Si un enregistrement devient "inactif", il n’apparaît plus dans la listbox, visiblement ca marche sauf que lorsque je passe tous les statuts a "inactif", la listbox et que je clique sur actualiser la listbox est bien vide mais quand je double clique ça m'affiche une valeur.

Merci de votre aide

cordialement

[tee_grandbois]

en effet, il garde en mémoire une valeur et pas forcément la dernière chargée, en plus. un bug Access non répertorié
et en plus, j'ai dit une bétise car j'ai testé avec combobox (liste déroulante) au lieu de listbox (zone de liste) du coup, le comportement est différent ...

Pour régler le problème, comme te le suggère marot_t, il faut vider la valeur en mémoire lorsque que tu actualises:

Code :

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

1
2
3
4
Private Sub Commande0_Click()
Me.lstInscrit.Requery
Me.lstInscrit.Value = Null
End Sub

[harry226h]

Bien recu.

Merci Marot_r et Tee_grandbois pour votre aide.

cordialement