Fråga : Filtrera subform för multipelcombobox i datasheet beskådar

Jag har brottats med detta för några dagar som now.

I har ett huvudsakligt att bilda med en datakälla av en tbl som innehåller konto för konto info…, numrerar, den kända chefen, Etc. på denna bildar mig har en subform i datasheeten att beskåda, som visar alla av tillgångar som tilldelas till kontot.  Det ska slutligen finns 200 eller så rekord i tillgångtblen, och jag önskade att ha informationen snabbt som var sortable via comboboxes på det huvudsakligt att bilda ovanför de respektive subformsna, sätter in.  Förmiddag som I visar endast fyra sätter in att jag skulle något liknande för att filtrera by på detta huvudsakligt bildar.  De är (Asset_Type, knyter kontakt, rum och Primary_User). målet för

The här är att ha på huvudsakligt bildar laddar alla rekord som visas i subformen.  När en av comboboxesna uppdateras, jag skulle något liknande det för att filtrera rekorden i subformen för att matcha.  Förmiddag som I har utfärdar att få att precis att fungera på denna point.

To tillfoga till komplexiteten, mig skulle likt de resterande comboboxesna som tillfogar att fortsätta, filtrerar, som de är updated.

Example: Visas, när användaren uppdaterar cmbType = bärbar dator, only bärbar dator skulle, då, om cmbPrimary_User är uppdateringen till N.N, jag skulle något liknande för att se endast bärbar dator som tillhörde N.N och, så on.

I har sökt på här för några dagar och prövas olika olika kodifiera exempel.  Förmiddag som I inte mycket är versed med SQL, stränger och har inte fungerat med tar fram för några år nu.  Min VBA är grov på bäst, och jag vet att EE är det bäst förlägger till vänden för bra fast rådgivning och tar prov code.

Thanks i advance.

If du skulle något liknande för att se att vad jag har mig skulle så långt är mer än, lyckligt att överföra understödja info.
" klar "

Svar : Filtrera subform för multipelcombobox i datasheet beskådar

Det enklast jag vet långt som, är att bygga en fungera som kan bygga ditt filtrerar stränger, och därefter appellen, som fungerar när som helst, ett av dina sökandekriterier kontrollerar uppdateras. Till exempel:

Fungera BuildSearch ()

Dunkel sFilter som stränger

Om Nz (Me.cboDeviceType, "") <> "" därefter
  sFilter = ”DeviceType=” & Me.cboDeviceType
Avsluta om

Om Nz (Me.cboUserName, "") <> "" därefter
  Om Len (sFilter) > 0 därefter sFilter = sFilter & ”OCH”,
  sFilter = sFilter & ”UserName='" & Me.cboUserName & ”'”,
Avsluta om

Me.YourSubformControl.Form.filter = sFilter
Me.YourSubformControl.Form.FilterOn = True

Avsluta fungerar

Nu precis appellen, som fungerar från dina, kontrollerar:

UndercboDeviceType_AfterUpdate ()
  BuildSearch
Avsluta suben

Några spetsar:

Filtrera stränger är ingenting mer än giltig SQL VAR satser utan uttrycka ”VAR”, så du måste följa samma härskar:

Innesluta text värderar i singel- eller dubblettcitationstecken: ”UserName='" & Me.cboUserName & ”'” omges av singelcitationstecken

Innesluta daterar värderar i hashmarks: ”DateLoaned=#” & Me.txDateLoaned & ”nr.”,

Se till att du ser riktigt till din Subform kontrollerar. Denna är KONTROLLERA på ditt huvudsakligt bildar som varar värd bilda som, du använder som en subform. Den kan eller kan inte namnges samma som bilda dig använder som en subform (dvs. ”källan anmärker”), är så försiktig, när det ser till det, kontrollerar.
Andra lösningar  
 
programming4us programming4us