Discussion :

[acorna]

Bonsoir,
je me permets de créer un nouveau sujet avec le problème évoqué dans un sujet du début d'après-midi, mais qui ne trouve pas de solution.

Voilà:
J'ai donné à ma combobox un nouvelle source de données ( une requete ), et il faut que je lie cette combo à mon sous-formulaire, de façon à ce que lors d'une sélection sur la combo, le bon enregistrement s'affiche dans le sous-form.

Bien entendu, ma requête ( source de combo ), contient le champ toto,
et mon sous formulaire contient également un champ toto.

Reste à faire le lien entre les 2

Pour l'instant, voici le code :

Code :

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

1
2
3
4
5
 
Me.choix.ControlSource = marequete
Me.SS_FRM_Rech_Action.LinkMasterFields = Me.macombo.???
Me.SS_FRM_Rech_Action.LinkChildFields = Me.monchampsfils
Me.choix.Requery

Merci de votre aide

[RGShoop]

Salut,

essaye :

Code :

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

1
2
3
4
Me.choix.ControlSource = marequete
Me.SS_FRM_Rech_Action.LinkMasterFields = Me.macombo.column(1)
Me.SS_FRM_Rech_Action.LinkChildFields = Me.monchampsfils
Me.choix.Requery

A+ RGshoop

[acorna]

j'ai essayé avec le column(1), mais il me renvoie une valeur nulle;
Me.macombo.Column(1) vaut null , ce qui me vaut une belle erreur :/

[acorna]

toujours pas d'idées?

[Alexandre Sahli]

Bonjour,

Je ferais personnellement de la manière suivante si c'est possible:

en mode modification du formulaire:

1: lier le sous formulaire au combox si c'est possible (combo -->champs toto)
si ce n'est pas possible créer une zone de texte avec comme source "= [combo]"

2: puis mettre le code suivant pour mettre la nouvelle source de donnée au combo

Code :

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

1
2
Me.choix.ControlSource = marequete
Me.Me.SS_FRM_Rech_Action.Requery

3: mettre sur le combo après maj

Code :

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

Me.Me.SS_FRM_Rech_Action.Requery

Attention il faut que la colonne liée corresponde au même type de donnée que le combo ( il me semble que ce qui va le mieux se sont des champs liés sur des identification en Lon)

bonne chance

[acorna]

Bonjour,

J'ai mis dans mon sous-form un champ texte avec pour source ma combo, et mis le code que tu m'as indiqué. Rien ne se passe hélas, mon sous-form n'est toujours pas en adéquation avec le contenu de la combo.
J'ignore s'il faut obligatoirement passer par la redéfinition des champs père/fils à chaque changement de source de la combo...
Et surtout, comment faire cette redéfinition... ( accès aux champs de mon ss-form et aux champs de la requete source de la combo depuis le code).


Meric pour ton essai =)

[Alexandre Sahli]

si j'ai bien compris tu as un form avec une combo et dans ce formprincipal tu as un sous formulaire. OK?

si c'est le cas tu as dans le formulaire principal la combo et ta zone de texte si nécessaire comme je te l'ai mis avant.

dans ton sous formulaire tu as ton champs de liaison avec soit la combo ou la zone de texte qui se trouve dans le form principal.

La liaison ne dois se faire qu'une fois lors de la création du formulaire. Ce n'est pas nécessaire de la faire chaque fois.

Personnellement j'utilise cette technique avec un sous form et une zone de texte dans le formulaire principal. Puis je change la source du sous-form sans refaire la liaison car je l'ai faite à la création

bonne chance car çà dois fonctionner

[acorna]

j'ai suivi tes instructions. Une fois la zone de texte avec comme source controle la combo mise dans le formulaire principal, je mets mon ss-form avec par liaison un des champs de la requete de ma combo, et un des champs du sous form.
Mais apparement la zone de texte empeche le bon fonctionnement du système de synchro combo/ss-form, même si elle n'a aucun lien avec le sous-formulaire...
Je comprends le principe que tu as instauré, mais ne parviens pas à l'appliquer

[acorna]

Autant pour moi, j'ai répondu trop vite
Apparement ça marche, merci mille fois

[Alexandre Sahli]

Attention je ne comprends pas bien

Une fois la zone de texte avec comme source controle la combo mise dans le formulaire principal, je mets mon ss-form avec par liaison un des champs de la requete de ma combo, et un des champs du sous form

la liaison d'un champs de la requête de la combo qu'est-ce que çà veux dire? la combo est-elle bien dans le formulaire principal, de même que la zone de texte?

[acorna]

oui oui. La combo est avec la zone de texte, dans le form principal. La combo est controlée par une requete req. et la liaision se fait entre le champ toto de la requete req et le champ toto du ss-form.
Le principe marche bien, je te remercie.
Mais ceci a fiat naitre une autre souci. Quand j'essaie de changer la source controle de ma combo, celle-ci se met à vide, et la combo répond aux changements en me fournissant les données de req.
C'ets à n'y rien comprendre

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Private Sub monboutonquichangelasourcecombo_Click()
Me.N°Action.ControlSource = ""
Me.N°Action.Requery
Me.N°Action.ControlSource = req
Me.N°Action.ColumnCount = 2
Me.N°Action.ColumnWidths = "1 cm;5 cm"
Me.N°Action.Requery
End Sub


Private Sub macombo_Change()
MsgBox (macombo.ControlSource)
End Sub

====>> me renvoie req avant le click sur monboutonquichangelasourcecombo et vide après

[Alexandre Sahli]

Est-ce que lorsque tu changes la requête tu changes complètement les colonnes si c'est le cas ton code avec le changement de largeur de colonne est ok dans le cas contraire ce n'est pas nécessaire

mais je ferais plutôt

Code :

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

1
2
3
4
 
Me![N°Action].ColumnCount = 2
Me![N°Action].ColumnWidths = "1 cm;5 cm"
Me![N°Action].ControlSource = req

à voir

[acorna]

non, les colonnes sont exactement les même, quelle que soit la requete source de la combo.Je ne pense pas que le souci vienne de là.

[Alexandre Sahli]

peut être que :

Code :

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

1
2
3
Private Sub monboutonquichangelasourcecombo_Click()
Me![N°Action].ControlSource = req
Me.refresh

S'il renvoire le code req avant le clic il doit y avoir d'autre code avant

[acorna]

non, pas d'autre code :/
cette solution ne marche pas non plus, toujours source vide

[RGShoop]

Salut,

Tu devrais nous laisser voir ton appli pour que nous soyons d'une aide plus efficace ...

A+ RGShoop

[acorna]

ok, mais tout le code du formulaire , je l'ai déjà donné...

[Alexandre Sahli]

tu m'as bien titillé je t'ai donc concocté une solution maison ( en annexe) pour ton inspiration

[acorna]

Nickel, c'est absolument ce que je veux faire.
Je te fournit néanmoins ce que j'ai fait, pour que, si tu le souhaite, y jette un oeil et comprenne mes erreurs.
Si tu pouvais m'en fair eun retour par la suite ...
merci pour ton aide!

[Alexandre Sahli]

Voilà ton fichier corriger.

Ce que tu voulais faire c'était de rechercher une action pour l'afficher dans le SF. Donc ta zone de liste tu ne dois pas la relier à un champs. C'est une fonction de recherche.

J'ai aussi ajouter un module pour la suppression d'un enregistrement. c'est très pratique à çà ne fait pas appel au commande du menu. à toi de voir si tu veux garder.