Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Eric
Bonjour GillesM,
Essaies ceci: (à écrire dans un module) Le typage des variables est à redéfinir suivant tes besoins
Function fnDivisionSpeciale(Numerateur As Single, Denominateur As Single) As Long ' retourne la division entière ' on teste la valeur décimale If Numerateur / Denominateur - Numerateur Denominateur < 0.4 Then fnDivisionSpeciale = Numerateur Denominateur Else fnDivisionSpeciale = Numerateur Denominateur + 1 End If End Function
je me perd dans les arrondis ... je voudrais récupérer la partie entiere d'une division avec la condition
suivante
si le résultat de la division est < xx,4 alors je dois avoir xx si le résultat de la division est >=xx,4 je dois avoir xx+1
exemple résultat de la division = 8,333 je dois trouver 8 si résultat de la division = 8,4 je dois trouver 9
Merci d'avance
Bonjour GillesM,
Essaies ceci: (à écrire dans un module)
Le typage des variables est à redéfinir suivant tes besoins
Function fnDivisionSpeciale(Numerateur As Single, Denominateur As Single)
As Long
' retourne la division entière
' on teste la valeur décimale
If Numerateur / Denominateur - Numerateur Denominateur < 0.4 Then
fnDivisionSpeciale = Numerateur Denominateur
Else
fnDivisionSpeciale = Numerateur Denominateur + 1
End If
End Function
Essaies ceci: (à écrire dans un module) Le typage des variables est à redéfinir suivant tes besoins
Function fnDivisionSpeciale(Numerateur As Single, Denominateur As Single) As Long ' retourne la division entière ' on teste la valeur décimale If Numerateur / Denominateur - Numerateur Denominateur < 0.4 Then fnDivisionSpeciale = Numerateur Denominateur Else fnDivisionSpeciale = Numerateur Denominateur + 1 End If End Function
