Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Développement Développement Visual Basic Fonction qui arrondie unité supérieure, ça existe ???

Fonction qui arrondie unité supérieure, ça existe ???

26 réponses
Avatar
LE TROLL
Bonjour,

Est-ce qu'il existe une fonction qui arrondie à l'entier supérieur toute
valeur décimale?

Par exp:
1,1 = 2
0,0001 = 1
9,9=10

???

Merci, au revoir et à bientôt.
--
ng75 arobase noos.fr
------------------------------------------------------------
LE TROLL, éleveur de trolls depuis César, qui disait :
Avec une hache, celui qui tient le manche a toujours raison !
Signaler un problème avec ce contenu

10 réponses

Supprimer
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
1 2 3
Avatar
ng
Pourquoi est-ce que tu ne la codes pas toi même ?

--
Nicolas G.
FAQ VB : http://faq.vb.free.fr
API Guide : http://www.allapi.net
Google Groups : http://groups.google.fr/
MZ-Tools : http://www.mztools.com/

LE TROLL wrote:
Bonjour,

Est-ce qu'il existe une fonction qui arrondie à l'entier supérieur
toute valeur décimale?

Par exp:
1,1 = 2
0,0001 = 1
9,9

???

Merci, au revoir et à bientôt.


Avatar
LE TROLL
C'est ce que j'ai fait :o)


"ng" a écrit dans le message de news:
%
Pourquoi est-ce que tu ne la codes pas toi même ?

--
Nicolas G.
FAQ VB : http://faq.vb.free.fr
API Guide : http://www.allapi.net
Google Groups : http://groups.google.fr/
MZ-Tools : http://www.mztools.com/

LE TROLL wrote:
Bonjour,

Est-ce qu'il existe une fonction qui arrondie à l'entier supérieur
toute valeur décimale?

Par exp:
1,1 = 2
0,0001 = 1
9,9

???

Merci, au revoir et à bientôt.






Avatar
Zoury
> C'est ce que j'ai fait :o)



peut-on la voir ? (il existe moultes façons d'y parvenir)

--
Cordialement
Yanick
MVP pour Visual Basic


"ng" a écrit dans le message de news:
%
> Pourquoi est-ce que tu ne la codes pas toi même ?
>
> --
> Nicolas G.
> FAQ VB : http://faq.vb.free.fr
> API Guide : http://www.allapi.net
> Google Groups : http://groups.google.fr/
> MZ-Tools : http://www.mztools.com/
>
> LE TROLL wrote:
>> Bonjour,
>>
>> Est-ce qu'il existe une fonction qui arrondie à l'entier supérieur
>> toute valeur décimale?
>>
>> Par exp:
>> 1,1 = 2
>> 0,0001 = 1
>> 9,9
>>
>> ???
>>
>> Merci, au revoir et à bientôt.
>
>




Avatar
Gilles RONSIN
"LE TROLL" <le , le lun. 10 janv. 2005 19:44:10,
écrivait ceci:

Bonjour,



Salut

Est-ce qu'il existe une fonction qui arrondie à l'entier
supérieur toute
valeur décimale?

Par exp:
1,1 = 2
0,0001 = 1
9,9



debug.print int(x+.5)

devrait le faire :-)

--
Embryon de site : http://gilles.ronsin.free.fr
Nouvelle astuce : Script de création de raccourcis cible
http://gilles.ronsin.free.fr/#targetlnk
Il est impossible pour un optimiste d'être agréablement surpris.
Avatar
Gilles RONSIN
Gilles RONSIN , le lun. 10 janv. 2005 21:36:44,
écrivait ceci:

oooops
J'ai lu et répondu trop vite :-$


Est-ce qu'il existe une fonction qui arrondie à l'entier
supérieur toute
valeur décimale?

Par exp:
1,1 = 2
0,0001 = 1
9,9



debug.print int(x+.5)



debug.print int(x)+1
est mieux

--
Embryon de site : http://gilles.ronsin.free.fr
Nouvelle astuce : Script de création de raccourcis cible
http://gilles.ronsin.free.fr/#targetlnk
Il est impossible pour un optimiste d'être agréablement surpris.
Avatar
GD
Bonsour® Gilles RONSIN,

Gilles RONSIN , le lun. 10 janv. 2005 21:36:44,
debug.print int(x)+1
est mieux



???

x=1
debug.print int(x)+1 = ???? ;o)))

plutot :
debug.print int(x)+(int(x)<>x)
;o)))
@+
Avatar
ng
Plutot :

Public Function Arrondi(nb As Double) As Integer
Arrondi = Int(nb) - CInt(Int(nb) <> nb)
End Function

qui utilise une conversion explicite en int pour le test. c'est plus propre

ou tout simplement :
Public Function Arrondi(nb As Double) As Integer
If nb > Int(nb) Then Arrondi = nb + 1 Else Arrondi = nb
End Function




--
Nicolas G.
FAQ VB : http://faq.vb.free.fr
API Guide : http://www.allapi.net
Google Groups : http://groups.google.fr/
MZ-Tools : http://www.mztools.com/

GD wrote:
Bonsour® Gilles RONSIN,

Gilles RONSIN , le lun. 10 janv. 2005
21:36:44, debug.print int(x)+1
est mieux



???

x=1
debug.print int(x)+1 = ???? ;o)))

plutot :
debug.print int(x)+(int(x)<>x)
;o)))
@+


Avatar
Patrice Henrio
Si la fonction n'est utile que pour les nombres positifs :

Function ArrondiSupérieur(X as double) as double
ArrondiSupérieur (X) = - (Int( - X))
End Function



"ng" a écrit dans le message de news:

Plutot :

Public Function Arrondi(nb As Double) As Integer
Arrondi = Int(nb) - CInt(Int(nb) <> nb)
End Function

qui utilise une conversion explicite en int pour le test. c'est plus
propre

ou tout simplement :
Public Function Arrondi(nb As Double) As Integer
If nb > Int(nb) Then Arrondi = nb + 1 Else Arrondi = nb
End Function




--
Nicolas G.
FAQ VB : http://faq.vb.free.fr
API Guide : http://www.allapi.net
Google Groups : http://groups.google.fr/
MZ-Tools : http://www.mztools.com/

GD wrote:
Bonsour® Gilles RONSIN,

Gilles RONSIN , le lun. 10 janv. 2005
21:36:44, debug.print int(x)+1
est mieux



???

x=1
debug.print int(x)+1 = ???? ;o)))

plutot :
debug.print int(x)+(int(x)<>x)
;o)))
@+






Avatar
LE TROLL
Salut, voici cher ami, une des moult que naguère je fis :o)

Dim ent, deci As Double
ent = j 66
deci = j Mod 66
If deci <> 0 Then ent = ent + 1
' seule l'entier m'intéresse...
Avatar
LE TROLL
Merci, lol, même avec "oops", je n'ai pas demandé comment utiliser
debug, mais s'il existait une fonction qui arrondi à l'entier immédiatement
supérieur...
-------
1 2 3