Rekenen in Formulier

[Bavaria]

Beste mensen,

In Access wil ik het een en ander optellen en berekenen.

1 Is het mogelijk om te laten zien hoeveel (ingevulde) records de database bevat?
2 Een optie in de database is yes/no, graag zou ik willen zien hoeveel % van het totaal voor ja of nee heeft gekozen.

Alvast bedankt voor uw reactie!

Gr

 

[Guus2005]

1 - Ja, maar beetje rare vraag. Lege records bestaan niet of je doet iets verkeerd. Gebruik DCount()
2 - Op te lossen met hetzelfde statement als hierboven. Tel eerst de records met Yes, daarne met No doe je berekening en je hebt het antwoord.

En anders moet je het aan je leraar vragen.

enjoy!

 

[Bavaria]

Bedankt voor de reactie!

Maar hoe kan ik alleen de "yes" records tellen?

Gr, Jeroen

 

[Guus2005]

neem de where clause op in je dcount statement:

lngcount = dcount("*","tabelnaam","veld = true")

 

[Bavaria]

Nogmaals bedankt voor de reactie!

De formule heb ik ingevoerd, en als volgt veranderd

lngcount = dcount("*","Naam","Eigenaar = true")

Tabelnaam = Naam
En kolom waarop gefilterd dient te worden = Eigenaar

Als ik deze formule invoer komt er de waarde #Name? te staan.
Wat heeft dit te betekenen?

 

[Guus2005]

had je al yes geprobeerd i.p.v. true?

 

[Bavaria]

Ja, maar dat maakt niets uit.

Heb een versimpeld bestand bijgevoegd, zou je er misschien ff naar kunnen kijken? :thumb:

Gr, Jeroen

 

[Guus2005]

Je zat een beetje verkeerd te kijken. Ik heb eigenlijk geen wat dat was.

Ik heb je database aangepast.

enjoy!

 

[Bavaria]

Geweldig hij werkt :thumb:

Nu het volgende probleem... deze formule wil ik eigenlijk 2x of vaker toepassen.
Ik had geprobeerd om tabel en veld te veranderen. Dit lukt, maar ik kan de naam; Private Sub Form_Load() niet veranderen want dan werkt de formule niet meer. Hoe kan ik 2 van deze formules laten werken in 1 formulier?

Daarnaast wil ik een aantal velden bij elkaar optellen, bijv het aantal m2 van alle gebouwen die in het formulier worden genoemd. Welke formule kan ik hiervoor gebruiken?

Alvast bedankt!

Gr

 

[Guus2005]

private sub form_load()
   dim variabele as variabeletype
   variabele = doeBerekening(inputwaarde)
end sub

private function doeBerekening(inp as string) as string
'   je berekening komt hier   
end function

private sub controlnaam_click()
   dim variabele as variabeletype
   variabele = doeBerekening(inputwaarde)
end sub

Wel even debuggen!
Enjoy!

 

[Bavaria]

Wederom bedankt voor deze code, maar hoe kan ik twee van deze codes in 1 formulier gebruiken?

Gr

 

[Guus2005]

ik snap je vraag niet. open een nieuwe thread en stel je vraag opnieuw.