Demande pour Plafond !! Urgent merciRésolu

Question

Salut, je chercher sur VbNET si il existe la meme fonction que Excel : le plafond

Exemple j'ai une valeur de 2309 et je veux qu'il me donne le resultat au 100 superieur ! 

dans cete exemple excel rend 2400
Formule excel =>  =PLAFOND((A1);100)

Merci a vous

cs_casy · Accepted Answer

Je ne sais pas si elle existe ou pas, mais si elle n'existe pas tu peux t'en sortir avec ceci :
    Public Function Plafond(ByVal nbre As Integer) As Integer
        Return (CInt(Math.Ceiling(CDbl(nbre / 100)) * 100))
    End Function

---- Sevyc64  (alias Casy) ----<hr size="2" width="100%" /># LE PARTAGE EST NOTRE FORCE #

Dolphin Boy · Answer

Salut,

CInt

(Math.Ceiling(
CDbl(nbre)))

suffit, pas besoin de diviser par 100 puis multiplier par 100.

HI HI ! Ceiling = plafond in english.

cs_casy · Answer

Dolphin,Ci
nt(Math.Ceiling(
CDbl(nbre)))
 tu donne le plafond à 1 près. 

vara956demande le plafond à 100 près , d'où ma division par 100 au départ

---- Sevyc64  (alias Casy) ----<hr size="2" width="100%" /># LE PARTAGE EST NOTRE FORCE #

Dolphin Boy · Answer

OUPS !!! 
On peut retirer ma remarque qui est complètement nulle, je viens de la tester et ça ne marche pas.
Toutes mes excuses casy, c'est toi qui a raison.

mortalino · Answer

Et si il a plusieurs formule à faire et que le plafond n'est pas forcément 100 

@++ 

<hr size="2" width="100%" />
  --Mortalino--
Le mystérieux chevalier, "Provençal, le Gaulois"
<!--

cs_casy · Answer

En réponse à Mortalino (utilisation comme sous Excel)

    Public Function Plafond(ByVal nbre As Integer, ByVal pas As Integer) As Integer
        Return (CInt(Math.Ceiling(CDbl(nbre / pas)) * pas))
    End Function

---- Sevyc64  (alias Casy) ----<hr size="2" width="100%" /># LE PARTAGE EST NOTRE FORCE #

cs_vara956 · Answer

Merci a vous tous
Sébastien
Tres amicalement

Demande pour Plafond !! Urgent merci

7 réponses

Votre réponse

Discussions similaires