VBA code werkt gedeeltelijk in selectieformulier

[jvondermans]

Ik heb een formulier in access waarin door middel van drop-downlistjes selecties kunnen worden gemaakt.

Deze selecties dienen als criteria in een query die ik in VBA heb opgezet. Als er een keuze wordt gemaakt werkt de query prima, maar als ik in 1 van de dropdown-listjes geen keuze maak (omdat die dan niet van toepassing is) werkt het niet en pakt hij alle records.

weet iemand waar de fout zit:

'de basis van de SQL-query, hieronder worden de voorwaarden gedefinieerd
strSQL = "INSERT INTO afdruksamenvoeglijst "
strSQL = strSQL & "( Bedrijfsnaam, Telefoonnummer) FROM bedrijvenselectie WHERE"

'vullen van de variabelen (voorwaarden) uit de dropdown-listjes
If IsNull(Me.drpsoort_klant) Then
varsoort_klant = "[soort klant.value] like '*' OR [soort klant.value] is null "
Else
varsoort_klant = "[soort klant.value] = " & Chr(34) & Me.drpsoort_klant & Chr(34) & " "
End If

'samenvoegen van de basisquery met de voorwaarden
strSQL = strSQL & varsoort_klant 

DoCmd.RunSQL strSQL

hopelijk ziet iemand het, ik niet meer

Jordy

 

[jvondermans]

is er niemand die dit weet, of is mijn vraag onduidelijk.

De nood is hoog, ik zit vast

 

[Hoornvan]

jvondermans,

Ik weet helemaal niets van Access.
Zou je niet eerder hulp verwachten aan de Access helpmij zijde?