vba variabele in sql string

Status
Niet open voor verdere reacties.

Janzan

Gebruiker
Lid geworden
10 jan 2012
Berichten
61
Beste mensen,

Ik heb, met dank aan Octafish, een formulier gemaakt, met daarop wat keuze lijsten.
In 1 van die keuzelijsten kan ik een meervoudige selectie toepassen.
Het filteren op het formulier gaat zo perfect.
Nu wil ik op basis van die gegevens ook een rapport maken.

In de code voor de keuzelijst met meervoudige selectie wordt een filterstring samengesteld, sFilter
Die string wordt gebruit voor het formulierfilter.
Nu heb ik een knop gemaakt met onder andere deze code
Code:
strSQL="SELECT * FROM [ETP] WHERE [ARTIKELCODE]='" & sFilter & "';"

ETP is een query waar ik d.m.v de anderen keuzelijsten op het formulier de criteria ingeeft.
Ik krijg wel elke keer een rapport.....maar de selectie van de keuzelijst met meervoudige selectie wordt niet meegenomen.
Hoe moet ik op een juiste manier die meervoudige selectie van het keuzevak overbrengen in die sql string?
Zodat er een rapport gemaakt kan worden van wat ik op het formulier aan filterwerk heb gedaan.

b.v.b dank
 
Als je rapport gebaseerd is op dezelfde query als je formulier, kun je het filter van het formulier simpel overzetten naar het rapport. Je opent dan het rapport (waar geen criterium in zit, gewoon de volledige query) met de parameter Me.Filter. Zo simpel gaat dat!
 
Oke, maar waar moet die parameter Me.Filter staan dan??
ik heb het nu zo
Code:
DoCmd.OpenReport "Rapport 2011", acViewPreview, Me.Filter

Maar dat werkt niet, ik krig dan een rapport met alle records
 
opgelost..
er moet een , bij
Code:
DoCmd.OpenReport "Rapport 2011", acViewPreview,, Me.Filter
 
Het aantal komma's wil inderdaad nog wel eens uitmaken :)
Ik zou zelf nog een beetje ongerust raken van een rapport met de naam "Rapport 2011". Want daar heb je in 2013 en 2014 etc natuurlijk niet zoveel meer aan. Ik zou ofwel een dynamisch rapport maken dat op het vorig jaar filtert, of het jaar via een keuze laten selecteren. In beide gevallen hoef je het rapport nooit meer te veranderen, en al zeker de naam niet ;)
Maar ik denk dat het draadje naar Opgelost kan...
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan