Microsoft Office Access
uređuje Branislav Mihaljev, MVP

Filtriranje podforme iz Combo polja

Nivo:
NIVO 3 - Prilozi na ovom nivou su namenjeni naprednim korisnicima, onima koji se već dobro snalaze u programima i onima koji već imaju iskustva u naprednim tehnikama. Ovom nivou pripadaju preporuke i trikovi koje bi trebalo da savlada svako ko teži dugotrajnom i efikasnom radu u Office programima.

Šta učiniti kada za jedan podatak iz forme treba istovremeno videti relevantnu grupu podataka u podformi...

Filtriranje podforme iz Combo polja glavne forme ima smisla kada je potreban filtriran pregled informacija u relaciji jedan prema više. Opisana procedura se može proširiti, pa možete istovremeno filtrirati više podformi uz različite kriterijume.

Uzmimo za primer da se u Combo polju nalaze šifre kupaca, dok se u isto vreme za jednog kupca u podformi prikazuju detalji njegovih porudžbina. Biranjem vrednosti iz Combo polja (događaj OnChange) filtriraju se podaci u podformi. Pri promeni vrednosti u Combo polju veoma je važno postaviti prazan (Null) filter na podformu, kako se ne bi desilo da se filter primeni na već postojeće filtrirane slogove.

• Otvorite formu u režimu za dizajn (Design View).
• Selektujte podformu.
• Idite na osobine (properties).
• Postavite LinkMasterFields osobinu na ime ComboBoxa, a LinkChildFields na ime odgovarajućeg polja (TextBoxa) u podformi.

Drugo rešenje je koristeći VBA:

' Koristiti na događaju OnChange ComboBoxa

...

Dim frm as Form

Set frm = Me.TaskDetails.Form

frm.filter = ""

If IsNull(Me.combo1) Then
    frm.FilterOn = False
Else
    frm.Filter = "[IDKupac] = """ & Me.combo1 & """"
    frm.FilterOn = True
End If

Set frm = Nothing

...