Imam problem u criteria query postavim uslov [Forms]![Prva]![Druga]![Broj]. Prva mi je forma, Druga subform i Broj polje u subform. Hteo bih na osnovu vrednosti tog pojla da se otvara nova forma sa tom vrednošću. Stavio sam na After update polja Broj otvaranje nove forme na osnovu query koji ne radi. Pokušao sam da nađem na netu nešto, ali nisam uspeo. Referenciranje na formu nije problem, ali na subform ide malo teže. Probao sam j da u criteria query postavim lostfocus subform, ali mi ne ide.
Uslov u query polje forme
Zaključano
Zakačeno
Forms!Prva.Form!Druga.Form!Polje
Potpis
Sve sam fino smislio...
Još samo da propadne. :-)
Još samo da propadne. :-)
Probao sam, ali ovo ne funkcioniše subform mi je tabela.
Probajte Forms!Prva.Form!Druga!Polje
Potpis
Sve sam fino smislio...
Još samo da propadne. :-)
Još samo da propadne. :-)
Malo je nejasan nacin na koji pokusavate da ostvarite zamisljeno. Postavite na After update tog polja na subformi sledeci kod:
Code:
Dim stDocName as string
Dim stLinkCriteria as string
stDocName ="Ime ciljne forme"
stLinkCriteria= "[Kljuc na formi]=" & Me![Ime polja]
'ako je u pitanju tekstualna vrijednost onda"[Kljuc na formi]='" & Me![Ime polja] & "'"
DoCmd.OpenForm stDocName,,,stLinkCriteria, ,acFormEdit
Dim stDocName as string
Dim stLinkCriteria as string
stDocName ="Ime ciljne forme"
stLinkCriteria= "[Kljuc na formi]=" & Me![Ime polja]
'ako je u pitanju tekstualna vrijednost onda"[Kljuc na formi]='" & Me![Ime polja] & "'"
DoCmd.OpenForm stDocName,,,stLinkCriteria, ,acFormEdit
Potpis
Sve sam fino smislio...
Još samo da propadne. :-)
Još samo da propadne. :-)
Evo i "plasticno" ono sto je kolega Nenad objasnio.Pozdrav.
Potpis
Jednog dana...
Probao sam ovo, super funkcioniše međutim meni treba samo po kriterijumu broj jer mi Tabela2 ima mnogo polja, a odgovara mi pregled Datasheet. U suštini ovo bi mi trebalo samo da dodam polja u Tabelu2 kojih nema u formi Datasheet. Znači forma 3 sadrži podatke Tabele2.
Rešenje:
DoCmd.OpenForm "Form3", acNormal, , "[Broj]='" & Me![Broj] & "'"
HVALA PUNO!
Rešenje:
DoCmd.OpenForm "Form3", acNormal, , "[Broj]='" & Me![Broj] & "'"
HVALA PUNO!