Vba , avoir l'entier d'un nombre à virgule

[carlos]

Bonsoir

je souhaite connaitre l'entier de ce nombre :
Cells(1, 2).Value / Cells(12, 1).Value

De plus existe t'il un moyen de connaitre toutes les formules sous vba qui ne sont pas les memes que excel?

Merci

 

[Gérard DEZAMIS]

Bonsoir carlos

Sans aucune certitude ...

Range('A1') = Int(Range('B2') / Range('L1'))

@+ GD

 

[carlos]

Bonsoir Gerard

Avec certitude je peux te dire que tu as raison .


Sais tu si ik y a un endroit au monde ou se trouve toutes les fonctions de vba ?

Bien sur , meme avec une meme incertitude que ta premiere reponse.

Merci

 

[pat1545.]

Salut,

Entier = Int(Cells(1, 2).Value / Cells(12, 1).Value)




Patrick

 

[Gérard DEZAMIS]

Bonsoir Patrick

Re Carlos



Int, Fix, fonctions

Renvoie la partie entière d'un nombre.
Syntaxe
Int(number)
Fix(number)
L'argument number peut contenir une valeur de type Double ou toute autre expression numérique valide. Si l'argument number contient une valeur de type Null, Null est renvoyé.
Remarques
Les fonctions Int et Fix suppriment toutes deux la partie fractionnelle de l'argument number et renvoient l'entier obtenu.

Différence entre les fonctions Int et Fix : si number est négatif, Int renvoie le premier entier négatif inférieur ou égal à number, alors que Fix renvoie le premier entier négatif supérieur ou égal à number. Par exemple, Int convertit -8,4 en -9 et Fix convertit -8,4 en -8.

Fix(number) équivaut à :

Sgn(number) * Int(Abs(number))


Voilà un exemple de ce que tu trouves dans l'aide de VBE (Alt F11)
Evidemment c'est pas folichon comme aspect mais .... tout ou presque y est ...

Tu sais j'en suis à mes premiers pas trébuchants en VBA et les 978 pages du VBA pour Excel de Walkenbach que j'attaque avec ....crainte ne sont pas plus atractives pour un débutant.
Quand on voit ce que certains ici font ..... (je ne cite pas de nom !) on a envie d'aller se coucher tout de suite


Bon Courage

@+ GD

 

[carlos]

bonsoir Gerard et Patrick

Merci pour les informations

Je pensais que int() me renverrait l'entier inferieur mais non c'est le superier
ex int(12.4) = 13

j'aurai besoin d'avoir le inferieur.

Malheureusement in(12.4) - 1 ne me convient pas si le nombre est deja un entier .

comment faire ???

Merci

 

[carlos]

Bonsoir

OUPS ne chercez pas , j'avais pas rafraichis ma boite (cranienne)

Merci

 

[myDearFriend!]

Bonsoir Carlos, Gérard, Patrick.

On peut aussi tout simplement utiliser la division entière ('\') dans VBA :

Entier = Range('B2') \ Range('L1')

Cordialement.

 

[pat1545.]

re

il y a aussi plancher et autre arrondi.inf :woohoo:


Patrick