Excel vba arrondir

Function RoundTo(pNumber As Long, pFactor As Long)
    RoundTo = Round(pNumber / pFactor) * pFactor 
End Function
' ---------------------------------------------------------------
Sub TestMe()
    Debug.Print RoundTo(2543, 10)    ' => 2540
    Debug.Print RoundTo(2546, 10)    ' => 2550
End Sub

Source: grepper.com

Similar codes

0 vote226 views1 answer
Vba cell all borders
VBA
-1 vote199 views1 answer
Text to speech vb.net
VBA
0 vote205 views1 answer
Vba add month to date
VBA
0 vote197 views1 answer
Excel vba hide columns
VBA
0 vote198 views1 answer
Excel vba disable copy paste
VBA
0 vote204 views1 answer
Vbnet find highest value in chart
VBA
0 vote184 views1 answer
Excel vba linter
VBA
0 vote212 views1 answer
Excel vba unlock sheet without password
VBA
0 vote284 views1 answer
Vba array of integers
VBA
5 votes219 views1 answer
Excel vba left word from Long Integer
VBA