variabele public?

[maartenf]

ik wil graag het volgende:
ik heb op een form een kaartje met gemeenten. als je op een gemeente klikt moet er een query (in vba) worden uitgevoerd (met als voorwaarde de id van de gemeente). ik kan natuurlijk achter elke gemeente dezelde code zetten met steeds een andere variabele, maar dat kan vast simpeler. maar hoe?

alvast bedankt

groet
Maarten

 

[Tardis]

Hallo Maarten,

stuur de gekozen waarde mee als variabele.

Tardis

 

[maartenf]

ik begrijp dat je op het formulier knopjes hebt. in dit geval knopjes met gemeenten.
achter dat knopjes staat dan iets van

Private Sub Bijschrift5_Click()
crit = "[gemid] = 1"
voerqueryuit
end Sub


en ergens anders staat

sub voerqueryuit()
Dim db As Database
Set db = CurrentDb()
db.Execute ("DELETE selectedgemeente.* FROM selectedgemeente;")
db.Execute ("INSERT INTO selectedgemeente SELECT gemeenten.* FROM gemeenten WHERE (((gemeenten.gemid)=" & crit & "));")
DoCmd.OpenForm "formulier2", acNormal, , , , acDialog
End Sub

maar hoe krijg ik die variabele uit het formulier in de query?

 

[maartenf]

opgelost

al gevonden.
dit moest bovenaan


Option Compare Database
Public crit As String

Maarten