Waarde uit verschillende velden afhankelijk van ander veld

[Franky27]

Ik ben met het volgende aan het worstelen.

Ik heb tabel met 3 velden

Veld1
Veld2
Veld3

Als ik in formulier een onafhankelijk veld met een waarde heb die bijvoorbeeld 2 is dan wil ik een subform met een query als gegevensbron weergevent

SELECT.... WHERE Id = Veld2

Heeft het veld in het formulier een waarde 1 dan zou ik query

SELECT.... WHERE Id = Veld1

willen hebben

Iemand een idee?

 

[henkhoogerbrug]

Je zou met een array kunnen werken, omdat je 1, 2 of 3 als waarde krijgt uit het formulierveld:

Dim velden As Variant
velden = Array("Veld1", "Veld2", "Veld3")

ps. de eerste waarde van de array staat op positie 0, maar volgens mij kun je dit ook beïnvloeden.