Hallo

Ik heb een tabel (Kantine dienst) met drie velden Id, Naam en Datum, ik heb een query gemaakt gebaseerd op deze tabel met daarin een extra veld om per week te kijken wie er kantine dienst heeft, in dit veld staat de volgende formule DatePart(“ww”;;2;2) met als parameterwaarde . Op deze Query heb ik een Rapport gemaakt die laat per week zien wie er kantinedienst heeft. Nu wil ik niet het weeknummer invullen doormiddel van de parameter invulvenster die automatisch wordt getoond bij het openen van mijn rapport, maar ik wil deze invoeren in een InputBox, dit heeft twee redenen, om VBA beter te leren en het staat professioneler, kan iemand mij op weg helpen of heeft iemand een voorbeeld voor mij hoe ik dit moet doen. Dit heb ik.

Private Sub Knop1_Click()

InputBox (“Vul hier een weeknummer in”), “Kantinedienst”, “huidige weeknummer”

?Hoe kan ik die waarde die ik invul koppelen aan mijn query zodat de juiste gegevens getoont worden.

End Sub

Gr. Bas