Arrondi des chiffres d'un tableau

  • Initiateur de la discussion Faust
  • Date de début
F

Faust

Guest
Bonjour à tous,
J'aimerai que vous m'aidiez à arrondir des chiffres.
Exemple : Arrondi(0.2444445;3) me donne 0.244. Je trouve normalement 0.245 lorsque je fais l'arrondi. De même Arrondi (2.38645;3) donne 2.386 alors que manuellement j'ai 2.387.
Comment faire pour trouver mes resultats?
Merci.
 
Y

yvon51

Guest
re
avec arrondi, il est normal que l'arrondi au 3ème chiffre après la virgule soit à la valeur inférieure si le quatrième est inférieur à 5 et arrondi à la valeur sup si = ou sup à 5.

yvon
 
Y

Yeahou

Guest
Bonjour Faust, Yvon51, le forum

Je ne sais pas si cela va aider mais j'ai programmé une fonction qui arrondit comme le souhaite Faust. Tu vas voir que quelqu'un va sortir une fonction excel qui fait ça directement.
M'enfin!

Cordialement, A+

Function Arrondir_Special(Val_a_Arrondir As Double, Nb_Ch As Integer) As Double
Dim Val_en_TXT As String, Val_en_Nb As Double, Compteur As Long
Val_en_TXT = Abs(Val_a_Arrondir - Fix(Val_a_Arrondir))
If Len(Val_en_TXT) > 2 Then Val_en_TXT = Right(Val_en_TXT, Len(Val_en_TXT) - 2)
If Len(Val_en_TXT) > Nb_Ch Then
Val_en_Nb = Val_en_TXT
For Compteur = Nb_Ch + 1 To Len(Val_en_TXT)
Val_en_Nb = Val_en_Nb / 10
Val_en_Nb = WorksheetFunction.Round(Val_en_Nb, 0)
Next Compteur
If Fix(Val_a_Arrondir) = 0 And Val_a_Arrondir < 0 Then
Val_en_Nb = "-0," & Val_en_Nb
Else
Val_en_Nb = Fix(Val_a_Arrondir) & "," & Val_en_Nb
End If
Arrondir_Special = Val_en_Nb
Else
Arrondir_Special = Val_a_Arrondir
End If
End Function
 
Y

Yeahou

Guest
Bonjour Faust, Yvon51, Jeanmarie, le forum

Jean marie, tes formules arrondissent à l'excés et je ne pense pas que c'était ce que désirait Faust.

j'avais compris
0.2444445 arrondi à la sixième décimale fait 0.244445
0.244445 arrondi à la cinquième décimale fait 0.24445
0.24445 arrondi à la quatrième décimale fait 0.2445
0.2445 arrondi à la troisième décimale fait 0.245

donc
0.2444445 arrondi à la troisième décimale fait 0.245

Cordialement, A+
 

Discussions similaires

Statistiques des forums

Discussions
312 493
Messages
2 088 956
Membres
103 990
dernier inscrit
lamiadebz