Selectie sorteren op gegevens

[huizemeul]

Beste,

Heb een vraag over het selecteren van gegevens.
In het adresboek met contactpersonen komen alle records voor.
Nu wil ik dat in het adresboek van Bedrijven zodanig wordt geselecteerd dat alleen de bedrijven overblijven.
Nu krijg ik nog alles met spaties.
Dus met lege records voor contactpersonen.
Wie kan mij hierbij helpen.
Zie bestand

 

[OctaFish]

Ik kan geen rar bestanden openen op het werk, dus ik kan er vanavond pas naar kijken. Wil je sneller antwoord, dan heeft iemand anders misschien wel tijd, of je moet er nog even een zipje van maken. Dan kijk ik straks wel even.

 

[huizemeul]

Beste OctaFish

Helaas kan ik geen Zip opsturen.
Deze zit op 123 en het kan tot 100.
Graag hoor ik morgen je antwoord.

 

[huizemeul]

Beste OctaFish

Het is mij toch gelukt iets te verkleinen.
Graag je antwoord als het uitkomt.
Zie zipje

 

[OctaFish]

Ik neem aan dat het om het rapport gaat, want dat is het enige object dat ik zie waarin je 'Bedrijven' hebt staan. Dat rapport kun je simpel filteren op bedrijven:

Private Sub Report_Load()
    Me.Filter = "[Bedrijf]<> Null"
    Me.FilterOn = True
End Sub

Plak deze code in de VBA module van je rapport, en je bent er.

 

[huizemeul]

Beste OctaFish

Mijn dank is groots

 

[OctaFish]

Omdat je zo vriendelijk bedankt, nog een toegift . Kijk eens naar jouw formule, en vergelijk hem met de mijne...

Contactpersoon: IIf(IsNull([Achternaam]);IIf(IsNull([Voornaam]);[Bedrijf];[Voornaam]);IIf(IsNull([Voornaam]);[Achternaam];[Voornaam] & " " & [Achternaam]))

Contactpersoon: IIf([Achternaam] Is Null;[Bedrijf];[Achternaam] & ", "+[Voornaam])

 

[huizemeul]

Beste OctaFish

Heb er goed naar gekeken.

Formule is korter en doet hetzelfde. Dus Perfecto.

Nogmaals mijn grote dank

 

[OctaFish]

Snap je het verschil tussen IsNull([Achternaam] en [Achternaam] Is Null?

 

[huizemeul]

Beste OctaFish

Nee, volgens mij gebeurt er hetzelfde.

Maar zo te merken aan jouw antwoord niet!

 

[OctaFish]

Stukje theorie dan maar .
Het resultaat is inderdaad hetzelfde, maar IsNull is een VBA functie en Is Null is specifiek SQL. Dat betekent dat Is Null (theoretisch) sneller is, omdat Access geen 'uitstapje' hoeft te maken naar de VBA bibliotheek, en tevens dat de compatibiliteit met andere databases in tact blijft. Zo kun je vanuit een andere database geen query (met ADO) aanspreken die IsNull gebruikt, maar wel dus een query die op basis van Is Null is gemaakt.
't Is maar een weet .

 

[huizemeul]

Ik moet zeggen dat ik het als heel plezierig ervaar dat ik de uitleg van je krijg.
Zo kan ik nog meer leren over het in mijn ogen heerlijke programma.
Mijn grote dank voor de uitleg. Petje af.
Groeten Rob