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

3 votes262 views1 answer
Vba post request json
VBA
1 vote212 views1 answer
Excel vba first row in range
VBA
0 vote250 views1 answer
Vba userform textbox wrap text
VBA
0 vote226 views1 answer
Vba get workbook name
VBA
0 vote221 views1 answer
Vbs send keys
VBA
5 votes212 views1 answer
Excel vba how to unit test vba code
VBA
0 vote226 views1 answer
Faire appel à la mise en forme conditionnelle vba excel
VBA
0 vote224 views1 answer
Excel vba first working day month
VBA
0 vote220 views1 answer
Sendkeys vba selenium
VBA
0 vote232 views1 answer
Send text to clipboard vb.net
VBA