Abrunden auf VBAisch
07.12.2015 21:02:53
Karsten
Hallo,
ich möchte die durch 7 geteilte Zahl auf 0 Stellen abrunden. Den Befehl (RoundDown(0)) hab ich mit dem Makrorekorder aufgezeichnet und herumprobiert, aber geht so nicht.
Kann mir jemand den richtigen code dafür nennen?
Danke, Gruß Karsten
Dim lngDif As Long
If lngDif > 7 Then
lngDif = lngDif / 7 = RoundDown(0)
MsgBox lngDif & " Woche"
Exit Sub
End If