Sytse1
Gebruiker
- Lid geworden
- 9 aug 2007
- Berichten
- 584
- Office versie
- miDer
Beste forumleden,
Ik heb een vraag of het volgende mogelijk is.
Ik heb een form met een subform. De basis van mijn subform is een query.
Het forms en het daarbij behorende subform wordt getoond op basis van een cijferkeuze.
De keuze is van 16 tot 100.
Dit betekend dat ik 85 forms met subforms moet maken.
Als ik 1 form en subform maakt met de keuze voor de gewenste query scheelt dat een hoop werk.
B.v. het getal is 22 dan moet query nr 22 (Qry_Schema22spelers) de basis van het subform zijn.
Ik wil de met Access 2010 gemaakte database bijsluiten. Het bestand in zip of rar formaat is bijna 4mb groot.
Uploaden wil niet? Wellicht kan ik het tekstueel uitleggen of ander wil ik mijn testbestand graag op een andere manier toezenden.
In het bestand is bij openen kies optie 3: Spelers selecteren
Vervolgens in het volgend scherm Knop Toon geselecteerden (Er zijn al 22 geselecteerd)
In het volgend scherm de knop Toon wedstrijdschema.
Met als basis het aantal geselecteerden doet deze knop doet het volgende:
Nu wordt het Form en subform getoond waar mijn vraag overgaat.
De basis van het subform is de query Qry_Schema22spelers.
Nu mijn vraag kan middels VBA de query aan het subform worden toegewezen.
Sytse
Ik heb een vraag of het volgende mogelijk is.
Ik heb een form met een subform. De basis van mijn subform is een query.
Het forms en het daarbij behorende subform wordt getoond op basis van een cijferkeuze.
De keuze is van 16 tot 100.
Dit betekend dat ik 85 forms met subforms moet maken.
Als ik 1 form en subform maakt met de keuze voor de gewenste query scheelt dat een hoop werk.
B.v. het getal is 22 dan moet query nr 22 (Qry_Schema22spelers) de basis van het subform zijn.
Ik wil de met Access 2010 gemaakte database bijsluiten. Het bestand in zip of rar formaat is bijna 4mb groot.
Uploaden wil niet? Wellicht kan ik het tekstueel uitleggen of ander wil ik mijn testbestand graag op een andere manier toezenden.
In het bestand is bij openen kies optie 3: Spelers selecteren
Vervolgens in het volgend scherm Knop Toon geselecteerden (Er zijn al 22 geselecteerd)
In het volgend scherm de knop Toon wedstrijdschema.
Met als basis het aantal geselecteerden doet deze knop doet het volgende:
Code:
Function MaakSchemaTabel()[/I]
Dim Teller
Teller = Forms!Frm_GeselecteerdeSpelers!Teller
On Error Resume Next
DoCmd.SetWarnings False 'Waarschuwingen uitschakelen
If Forms!Frm_GeselecteerdeSpelers.Teller = 22 Then
DoCmd.OpenQuery "Qry_Schema22spelers_MaakTabel"
End If
DoCmd.SetWarnings True 'Waarschuwingen inschakelen
End Function
DoCmd.OpenForm "Frm_WedstrijdschemaSpelers", acNormal, "", "", , acNormal
Nu wordt het Form en subform getoond waar mijn vraag overgaat.
De basis van het subform is de query Qry_Schema22spelers.
Nu mijn vraag kan middels VBA de query aan het subform worden toegewezen.
Sytse