2- Ana form üzerine bir adet Metin Kutusu ekleyin ve içini şu şekilde doldurun:
Kod:
=nz(ALTFORMADI!ALTFORMKRITERI;0)
Kod:
=nz(GIDER FILTRE subform!No;0)
Metin kutumuzun adının Metin1, Kriterimizin ise NO olduğunu varsayarsak kodunuz şu şekilde olmalıdır:
Kod:
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "ANAFORMADI"
stLinkCriteria = "[NO]=" & Me![Metin1]
DoCmd.OpenForm stDocName, , , stLinkCriteria
DoCmd.Close acForm, "TumListe"
Hatasız anlattığımı düşünüyorum ama siz yine de bi deneyin. Olmazsa yazın. Tekrar bakalım...
Kolay gelsin...