Gewoon, berekenen van voorloopnullen

[René Ros]

Een kleine tip om in berekeningen voorloopnullen aan een getal toe te voegen en ook aan een datum. Soms zien we heel lange berekeningen die voor elk getal onder de 10 een enkele nul toevoegt. En wat als het om getallen van meer dan twee cijfers gaat? Dat kan handiger...

Het principe is om een getal om te zetten naar tekst en ervoor een maximum aantal nullen te plaatsen. Vervolgens wordt daarvan de rechter tekens genomen. Een getal dat altijd drie cijfers moet zijn, kan als volgt berekend worden:

Right ( "000" & GetAsText ( getal ) ; 3 )

Door als getal de dag en maand te gebruiken kan een datum met voorloopnullen berekend worden, zoals 07-05-2017.
Dat is handig voor het berekenen van een tekst, e-mail, export en dergelijke waar getal- en datumnotatie niet beschikbaar zijn. Helemaal handig als het als Eigen Functie wordt toegepast.

Code: Selecteer alles

If ( IsEmpty ( datum ) ;
  "ongedateerd" ;
  Right ( "00" & GetAsText ( Day ( datum ) ) ; 2 ) & "-" &
    Right ( "00" & GetAsText ( Month ( datum ) ) ; 2 ) & "-" &
    GetAsText ( Year ( datum ) )
)