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

6 votes170 views1 answer
Excel vba get the path of current workbook
VBA
0 vote176 views1 answer
Iterate all file in a folder vba
VBA
32 votes294 views2 answers
Excel vba column letter
VBA
0 vote150 views1 answer
Vba like with wildcard
VBA
0 vote171 views2 answers
S yyyy-MM-dd em vb net
VBA
-1 vote158 views1 answer
Vba code to add new column in table
VBA
0 vote161 views1 answer
Discern between file and folder given path vb.net
VBA
0 vote153 views1 answer
Vbnet access System.InvalidOperationException: 'Update requires a valid UpdateCommand when passed DataRow collection with modified rows.'
VBA
5 votes175 views1 answer
Vba low byte from INTEGER
VBA
1 vote167 views1 answer
Vba format string as cash
VBA