pc vba avec un sous formulaire

pc vba avec un sous formulaire - VB/VBA/VBS - Programmation

Marsh Posté le 25-11-2004 à 10:28:16    

j'explique mon pb.
J'ai un formulaire avec une liste déroulante comprenant des enregistrements. Quand je choisis un enregistrement, les champs du formulaires se remplissent en fonction de l'enregistrement sélectionné. Le pb, c'est que dans ce formulaire, j'ai un sous formulaire dont les champs devrait aussi se remplir en fonction de la liste déroulante de mon formulaire principal. Comment effectuer cette liaison en VBA
 
Voila le code que j'ai essayé (qui ne fonctionne pas qu'avec le sous-formumlaire)
 
- Code de la liste déroulante
Private Sub liste_pc_AfterUpdate()
Dim Clé As Integer
Clé = Me!liste_pc.Column(0)
tord.Index = "PrimaryKey"
tord.Seek "=", Clé
AfficherPc
End Sub
 
Mon formualire principal s'appele f_ordinateur et le sous-formulaire DD. Donc la j'ai essayé de faire un liaison champs fils champs pere
- Fonction appelée
Public Sub AfficherPc()
Forms!f_ordinateur!nompc = tord.Fields("nompc" )
Forms!f_ordinateur!mppc = tord.Fields("mp" )
Forms!f_ordinateur!cartemere = tord.Fields("carte mere" )
Forms!f_ordinateur!processeur = tord.Fields("processeur" )
Forms!f_ordinateur!ram = tord.Fields("ram" )
Forms!f_ordinateur!DD.Form.LinkMasterFields = Forms!f_ordinateur!liste_pc.Column(0)
Forms!f_ordinateur!DD.LinkChildFields = tdd.Fields("id_pc" )
End Sub
 
Je vous remercie de votre aide.

Reply

Marsh Posté le 25-11-2004 à 10:28:16   

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed