Discussion :

[polianita]

Bonjour à tous,

Je me trouve un peu inquiète car débutante en VBA,
Et voilà mon souci:
J'ai un formulaire principale = F_Impl_Imm
Il contient deux sous formulaires : SF_Impl et SF_Imm tous les deux en mode continu,
la source de SF_Impl est la table T_Implantation
la source de SF_Impl est la table T_Immeuble
ces table sont relié par une réf_Implantation qui est contenu dans chacune des deux tables
Mon besoin est que dés je clique sur une ligne dans le sous-formulaire SF_Impl il faut que le sous formulaire SF_Imm affiche les données de sa table relié à cette ligne de SF_Impl par la variable réf_Implantation

On cherchant j'ai fait cela dans le SF_Impl
Private Sub Form_Click()
Form_SF_Immeubles.RecordSource = "Select ESI_Immeuble,Adresse_Immeuble,CodePOstal_Immeuble,Ville_Immeuble,RefImplanation from T_Immeuble Where RefImplanation =" & Me.réfImplantation
End Sub

Mais cela ne marche toujours pas?
merci de m'aider

poliana

[polianita]

SVP donnez moi un début de solution si vous savez coment faire ça ou vous avez une autre idée
Merci

[Invité]

Bonjour Polianita,

Pourquoi ne pas mettre un sous-formulaire "SF_Imm" lié à la table T_Immeuble en pied de formulaire, dans ton sous-formulaire "SF_Impl" lié à la table T_Implantation

Tu lies "SF_Imm" à "SF_Impl" par le champ "réf_Implantation".

Et hop le tour est joué, pas besoin de VBA derrière, dès que tu cliques sur une ligne de "SF_Imm", le "SF_Impl" est mis à jour.

Cordialement.

[keita]

salut
1/essai d'utiliser l'evenement "sur activation" de ton sous form1
2/Et une fois là dedans, pour atteindre la source de ton sous form2, fais:

Code :

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

Me.Parent!sousForm2.recordsource="SELECT blablabla...."

j'espere que ça marchera
@+

[polianita]

Comment relié SF_Immeuble et SF_Impl avec réfImplation?
Sachant que les deux tables sont déjà relié par cette variable
Encore Merci

[polianita]

J'ai mis :
Me.Parent!SF_Immeubles.RecordSource = "Select ESI_Immeuble,Adresse_Immeuble,CodePOstal_Immeuble,Ville_Immeuble,RefImplanation from T_Immeuble Where RefImplanation =" & Me.réfImplantation

comme vous m'aviez proposé, mais erreur :il reconnai pas SF_Immeubles
j'ai essayé avec form_SF_Immeubles mais toujours la meme erreur
Qu'est ce que vous en pensez?
merci

[Invité]

1) Dans le pied de ton sous-formulaire "SF_Imm", tu insères un sous-formulaire "SF_Impl"

2) Tu vas dans les propriétés de ton "SF_Impl", dans l'onglet "Données" -> Champ fils = RéfImplantation / Champ père = RéfImplantation

Voilà il ne reste plus qu'a faire une mise en page de ton sous-formulaire.

[polianita]

Merci beaucoup Bruno ça marche nickel

happy poliana