Requery txt velden met combobox

[bertje123]

Hoi!

Ik heb hier al wat zitten zoeken maar vind niet echt een antwoord.
Mijn probleem gaat als volgt:

Ik heb een combo box met een distinct van waarden, als ik daaruit een waarde neem
wil ik bijvoorbeeld in een ander tekst veld bv de count van deze selectie.

ik heb al volgende + nog veel andere dingen geprobeerd, maar niets dat helpt.
Hij blijft constant de totale count van de tabel tonen :/

Dim strWhere As String
Dim lngLen As Long

If Not IsNull(Me.CmbNoun) Then
strWhere = strWhere & "([NOUN CODE] = """ & Me.txtnoun & """) AND "
End If

Iemand een idee?

Bedankt

 

[OctaFish]

Blijkbaar heb je in de bron van de keuzelijst al een Totalen query als basis. (of anders zou je hem moeten aanpassen). Je groepeert immers al op een bepaald veld.
Als je die querybron aanpast, en een veld Aantal_Waarden toevoegt, met de functie Aantal op het sleutelveld, dan zou je de gewenste waarde al moeten terugzien in je query.
Op het tekstveld kun je de waarde dan terug laten komen als besturingselementbron:
Me.Keuzelijst.Column(#), waarbij # het kolomnummer-1 is, omdat de functie Column() bij 0 begint te tellen.
Me.Keuzelijst.Column(2) bijvoorbeeld, als de nieuwe kolom de derde kolom is in de query.