Round functie afronden

[demasuredries]

Hallo,

IK ben bezig met formules. Maar bij de formule ROUND zou er altijd naar beneden moeten worden afgerond
Dus 19.9 zou moeten afgerond worden naar 19, en niet naar 20.

Ik heb volgende code:
MaatRijboring = frmKast.txtHoogte - frmKast.txtOnder1 - frmKast.txtBoven1
Tussenstap1 = (MaatRijboring / 32)
Tussenstap2 = Round(Tussenstap1)
Tussenstap3 = (Tussenstap2 * 32)
spelingRijboring = (MaatRijboring - Tussenstap3) / 2

Hoe kan ik dit oplossen?

Danku

 

[goedlichtJoost]

Math.Floor rond altijd naar beneden af.

 

[demasuredries]

Hallo,

Ik heb deze ingevoegd :
MaatRijboring = frmKast.txtHoogte - frmKast.txtOnder1 - frmKast.txtBoven1
Tussenstap1 = (MaatRijboring / 32)
Tussenstap2 = Math.Floor(Tussenstap1)
Tussenstap3 = ((Tussenstap2 - 1) * 32)

Maar ik krijg volgende foutmelding:
Compile error:
Method or data member not found

Hoe kan ik dit oplossen?

Alvast bedankt voor de info

 

[goedlichtJoost]

Math. weghalen.
dus alleen Floor gebruiken

 

[demasuredries]

Hallo

MaatRijboring = frmKast.txtHoogte - frmKast.txtOnder1 - frmKast.txtBoven1
Tussenstap1 = (MaatRijboring / 32)
Tussenstap2 = Floor(Tussenstap1)
Tussenstap3 = ((Tussenstap2 - 1) * 32)

Ik krijg volgende error:
"compile error"
Sub or Function not defined...

Ik werk al in een subprogramma

 

[The Mighty Atom]

Probeer eens Math.Ceiling.

 

[demasuredries]

Math.Ceiling is niet gekent in Vba
ook Floor is niet gekend

Wanneer ik nu afrond komt bv een waarde van 27.658 afgerond 0 uit ..
Weet iemand hoe dit komt?