Discussion :

[malabar92]

Hello

Sur un formulaire, j’ai un sous formulaire lié (champs père fils ok) et 2 zones de liste modifiable.
J’aimerai que :
1- le contenu du sous formulaire soit trié selon les valeurs contenues dans les zones de liste modifiable (pour ça, je me suis inspiré de ce code de la FAQ
2- quand je change d’enregistrements sur le formulaire principal, les données correspondantes soient bien actualisées dans le sous formulaire.

J’ai 2 problèmes avec le sous formulaire :
- Quand je change d’enregistrement, le sous formulaire est bien actualisé si le contenu des zones de liste sont identiques entre les enregistrements. Si ça n’est pas le cas, le sous formulaire affiche un champ vide.
- Le contenu du sous formulaire met une quinzaine de secondes pour s’actualiser si je change la valeur d’une des 2 zones de liste modifiable.

Sur les 2 zones de liste modifiable, j’ai mis ce code (idem pour Modifiable2) :

Code :

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

1
2
3
4
5
Private Sub Modifiable1_Change()
    Dim CTRL As Control
    Set CTRL = Me.MonSousForm.Form!MonChampduSousForm
    CTRL.Requery
End Sub

Qqun aurait-il une idée pour résoudre le pb ?

[Heureux-oli]

Si tu mettais simplement

Code :

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

1
2
 
Me.monsousform.requery

[malabar92]

Hello

Merci de m'aider.

Ta proposition ne change rien aux 2 problèmes.

[dretore]

Bonjour,

J'ai à peu près le même problème que toi et pour l'instant, je n'ai moi non plus pas trouver de solution.

Si tu en avais une, pourrais-tu me le faire savoir ?

Cordialement

[malabar92]

Je pense avoir trouvé l’origine du pb :
Si je met des Forms ![Formulaire] ![MonChamp] dans la requête source du sous formulaire (comme dans le code de la FAQ), le sous formulaire se filtre bien mais ne s’actualise plus quand je passe d’un enregistrement à un autre.
L’inverse est vrai, bref un casse tête.

Avez-vous une idée pour résoudre ou contourner le pb ?

[Heureux-oli]

Si tu met ton code sur le Après mise à jour à la place de sur changement, ça devrait aller un peu mieux.

Code :

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

1
2
3
4
 
Sub Moncombo_Afterupdate()
Me.monsousform.requery
End Sub

[malabar92]

J'ai testé mais ça ne change rien non-plus.

[Heureux-oli]

Le temps de réaction peut être lié au fait que les champs fils ne sont pas indexés.
L'indexation des champs accélère la recherche.

[malabar92]

Hello,

j'ai exposé les 2 pbs qui me gènent sur le formulaire. Je vais tester avec l'indexation mais celui qui me gène plus l'instant le plus est quand je change d’enregistrement, le sous formulaire est bien actualisé si le contenu des zones de liste sont identiques entre les enregistrements. Si ça n’est pas le cas, le sous formulaire affiche un champ vide.

C'est le plus génant parce que je ne peut pas visualiser les données correctement.

[Heureux-oli]

Ok, sur la propriété sur activation, tu met un code qui va donner aux liste les valeurs des champs.

Code :

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

1
2
3
4
5
 
Sub MonForm_Current()
MonCombo = MonChamp
MonCombo2 = MonChamp2
End sub

[malabar92]

Dans ton code, à quoi correspondent MonChamp et MonChamp2 ?

Merci de m'aider.

[Heureux-oli]

Dans ton formulaire principal, il doit bien y avoir des champs autres que les listes.
Si c'est pas le cas il faut que nous en dise un peu plus et éventuellement mettre une copie de ta DB sur le forum.

[alassanediakite]

Salut
Il n'est pas rare de voir de tels problèmes. C.a.d afficher des résulats a partir d'une information choisie.
Tout d'abord je comprend qu'il existe un form principal plus deux (listes modifiables ou zones de liste) indépendants ie n'ayant pas de champ source dans la table ou requête source du form principal et un sous form .
Alors ma question est la suivante:
chaque (liste modifiables ou zone de liste) doit il afficher des enregistrements dans le sous form ou le deuxième est lié au premier (une sorte de recherche par critère et sous critère)
Dans tous les cas je pense qu'il faut laisser le sous form et se concentrer sur le form principal. De cette manière:

Code :

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

1
2
me.filter="[champ de critère dans la source du form principal]=" & me.[liste modifiables ou zone de liste]
me.filteron=true

Rmq: ce code peut changer si champ de critère dans la source du form principal] est de type TEXTE en

Code :

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

1
2
me.filter="[champ de critère dans la source du form principal]='" & me.[liste modifiables ou zone de liste] & "'"
me.filteron=true

En d'autres termes il faut plutôt chercher dans le form principal et le sous form s'alignera sans problème.
@+

[malabar92]

Hello

bon ben vu l'heure et que je sèche, je vous joint la base.

Merci de m'aider.

bd_Developpez.zip