Decimalen in rapport

[RSpan]

Hallo allemaal

In een rapport heb ik een veld waar de kilometervergoeding berekend wordt.
gewoon uit een query [km]*[kmverg]
Nu zit ik met de weergave hiervan in het rapport.
De eigenschappen van dit veld zijn ingesteld op euro en 2 decimalen, wanneer er nu een bedrag uitkomt van 23,45 wordt dat ook zo weergegeven, echter komt er een bedrag van 23,40 uit de berekening dan wordt dit als 23,4 weergegeven.
Hoe kan ik er nu voor zorgen dat er 23,40 komt te staan?

groet
René

 

[OctaFish]

Misschien de Notatie handmatig instellen:
€ 0,00 i.p.v. Euro

 

[RSpan]

Misschien de Notatie handmatig instellen:
€ 0,00 i.p.v. Euro

Helaas werkt niet

 

[OctaFish]

Het veld bevat waarschijnlijk een berekening. Doe je die in vba, of in een query? Je kunt de opmaak verder ook in de berekening opnemen, of heb je dat ook al geprobeerd?

 

[RSpan]

Het veld bevat waarschijnlijk een berekening. Doe je die in vba, of in een query? Je kunt de opmaak verder ook in de berekening opnemen, of heb je dat ook al geprobeerd?

De berekening wordt inderdaad in het veld in het rapport gemaakt
=Som([kilometers])*[TblOpslag.Kmverg]
Maar het instellen van de eigenschappen van dit veld op Euro is dus niet voldoende, nu wil ik het met de functie FormatCurrency(expressie [, aantaldecimalen ] ) proberen maar daar krijg ik foutmeldingen op.
ik heb het alsvolgt gedaan:
FormatCurrency(=Som([kilometers])*[TblOpslag.Kmverg];2)
en dit is ook niet goed
=FormatCurrency(Som([kilometers])*[TblOpslag.Kmverg];2)
ook op internet heb ik niet het juiste voorbeeld kunnen vinden, kun jij me verder helpen?
Moet ik een andere functie gebruiken?

groet
René

 

[OctaFish]

Moet het niet dit zijn:
Format(Som([kilometers])*[TblOpslag.Kmverg]);"Currency")

 

[RSpan]

Moet het niet dit zijn:
Format(Som([kilometers])*[TblOpslag.Kmverg]);"Currency")

Nee helaas werkt ook niet
dit is de Syntaxis

FormatCurrency(expressie [, aantaldecimalen ] [, voorloopcijfer ] [, haakjesbijnegatief ] [, cijfersgroeperen ] )

Dus ik dacht iets van:
FormatCurrency(Som([kilometers])*[TblOpslag.Kmverg]);2)
maar ik krijg dan de melding "syntaxisfout in query-expressie First([FormatCurrency(Som([kilometers])*[TblOpslag.Kmverg]);2)])

waarmee ik niet verder kom, jij misschien

 

[Bakk4318]

First([FormatCurrency(Som([kilometers])*[TblOpslag.Kmverg]);2)])

Vervang de rode puntkomma eens voor een komma.

 

[OctaFish]

Je kunt er misschien een functie van maken:

Public Function Geld(Bedrag As Double) As String

    Geld = FormatCurrency(Bedrag, 2, vbFalse, vbUseDefault, vbUseDefault)

End Function

In een query gebruik je die dan zo:

Expr1: Geld(Som([kilometers])*[TblOpslag.Kmverg]))

 

[RSpan]

Vervang de rode puntkomma eens voor een komma.

Nee werkt niet ik heb een nederlandse versie en dan moet het ; zijn

 

[RSpan]

Je kunt er misschien een functie van maken:

Public Function Geld(Bedrag As Double) As String

    Geld = FormatCurrency(Bedrag, 2, vbFalse, vbUseDefault, vbUseDefault)

End Function

In een query gebruik je die dan zo:

Expr1: Geld(Som([kilometers])*[TblOpslag.Kmverg]))

dat ga ik proberen

 

[RSpan]

Je kunt er misschien een functie van maken:

Public Function Geld(Bedrag As Double) As String

    Geld = FormatCurrency(Bedrag, 2, vbFalse, vbUseDefault, vbUseDefault)

End Function

In een query gebruik je die dan zo:

Expr1: Geld(Som([kilometers])*[TblOpslag.Kmverg]))

Is hiermee niet gelukt, maar heb wel een oplossing gevonden nl Nz()
Som(Nz([kilometers]))*Nz([TblOpslag.Kmverg])
nu worden er wel 2 nullen achter de komma weergegeven.

Bedankt voor het meedenken:thumb:
Groet
René