Gruppeboks - som kriterie

vil det sige at gruppe boks 2 s indhold skal være afhængie af gruppe boks 1 `?

vi antager at vi har gr1 og gr2.

under egenskaber/hændelser for gr1 finde du ved udgang og sætter kode ind der ! :)
koden hedder :
if me.gr1= "1" then
  me.gr2.rowsource="Tommy;Jesper;Søren"
if me.gr1 = "2" then
  me.gr2.rowsource="asdasd;asdd;qqqq"
end if

Der skal kun være 1 gruppeboks - med 3 alternativer!

Når man vælger den første (1 - Fodbold) - skal alle de medlemmer som spiller fodbold vises (dvs. dem hvor aID = 1), når man vælger den næste (2 - håndbold), skal alle de medlemmer som spiller håndbold vises (dvs dem hvor aID = 2) osv.... man kan godt være medlem ved flere aktiviteter! Hjalp det?

En gruppeboks returnerer en numerisk værdi til tabellen f.eks.:

Trykker du på alternativknap1 i boksen returneres 1 trykker du på 2 returneres 2 o.s.v.

Du kan tage en ubundet tekstboks fra værktøjslinien (den hedder i det flg Tekstboks0) og sætte den på Detaljesektionen. I gruppeboksen Vedklik hændelse lægger du flg kode:

Select Case Me!Ramme0
Case is = 1
Me!Tekstboks0 = "Fodbold"
Case is = 2
Me!Tekstboks0 = "Håndbold"
Case is = 3
Me!Tekstboks0 = "Rundbold"
End Select

I den forespørgsel der ligger til grund for en formular eller rapport henviser du nu til formularen Tekstboks0:

[Forms]![Formularnavn]![Tekstboks0]

når du åbner en anden formular eller rapport vil du kun se de poster der matcher kriteriet.

Jeg er godt klar over at gruppeboksen returnerer en numerisk værdi (den angiver jeg selv).

Jeg vil helst undgå at skulle have en tekstboks med i min formular.

Der skal IKKE åbnes en anden formular eller rapport! der skal være tale om én og samme formular

så kan du filtrere efter rammen i rammens VedKlik:

Me.filter = "Tabellens felt = '" & Me!Ramme0 & "'"
Me.FilterOn = True

får en runtime på

Me.FilterOn = True

betyder det noget at det ikke kommer fra en tabel men en forespørgsel?

nej vent stop - tåbeligt, har fundet fejlen.. :-)

mugs - perfekt det virker som ønsket!

skulle bare fjerne ' dvs at den endelige kode kommer til at se sådan her ud:

Me.filter = "Tabellens felt = " & Me!Ramme0 & ""
Me.FilterOn = True

OK - Så er det et numerisk felt du fiktrerer på.