XL 2010 VBA partie entière d'une division

bof

XLDnaute Occasionnel
Bonjour,
Ça doit être simple mébon, je perd mon temps sur cette banalité...
Comment renvoyer la partie entière (non arrondie) d'une division.
Voici ma fonction qui ne marche pas :
Code:
Public Function ROWCOM%(i%)
ROWCOM = CInt(i - 1) / 5 + 1
End Function
Tout nombre de 1 à 5 doit renvoyer 1
Tout nombre de 6 à 10 doit renvoyer 2...
Merci
 

Si...

XLDnaute Barbatruc
Re

Salut Victor21 :) à qui je confirme que le fichier joint dysfonctionnait o_O, à

mapomme :) à qui je confirme son impression ;) (mais exotisme, quand tu nous tiens …)​

Pour en rajouter une couche, =Int((9 + i) / 5) - 1
 
Dernière édition:

mapomme

XLDnaute Barbatruc
Supporter XLD
Bonsoir,

Je n'ai pas compris le bénéfice de :
=1+ENT((A1-1)/5)
comparé à :
=ENT((A1+4)/5)

Pour moi, il n'y a pas de différence au niveau des résultats. Par contre, il n'en est pas de même avec l'expression VBA : =Cint((4+i)/5)

Cint tente de convertir une expression numérique en un nombre entier et effectue un arrondi (un peu spécial à mon goût)
Pour des nombres X de 4 à 4,5 (4,5 compris), cint(X) retourne 4.
Pour des nombres X de 4,5 à 5 (4,5 exclus), cint(X) retourne 5.
 
Dernière édition:

Discussions similaires

Réponses
22
Affichages
690

Statistiques des forums

Discussions
311 725
Messages
2 081 940
Membres
101 845
dernier inscrit
annesof