Bonsour®
pourquoi pas simplement : (...)
pour le fun alorsSalut Modeste geedee
Je voulais, pour le fun, trouver une méthode sans faire appel aux fonctions Excel. Dans la 'vraie vie', je les utilise les fonctions Excel.
Function VBTronque(Target, Decimale As Integer) As Double
VBTronque = Int(Target * (10 ^ Decimale)) / (10 ^ Decimale)
End Function
Function Tronque(ByVal Valeur As Double, ByVal Décimales As Integer) As Double
Dim Pui10 As Double
Pui10 = 10# ^ Décimales
Tronque = Int(Valeur * Pui10) / Pui10
End Function