Au fait Clément j'ai pas bien compris ce que tu proposes. Excuse-moi mais tu as du voir dans mon pseudo Excel...lent il ya LENT !
La division entière retourne juste l'entier de la division. Au lieu d'écrire deux instructions, tu n'en écris qu'une.
Peux essayer cela en vitesse:
sub cadivise() dim a, b, c, lareponse 'division conventionelle a= 181 /60 b = int(a) 'division entière c = 181 60
lareponse = a & ", " & b & ", " & c msgbox lareponse end sub
"Excel...lent" a écrit dans le message de news: Oqs$P$
Salut à tous,
Comme d'hab merci vous êtes d'une grande aide.
Cordialement.
Excel...lent
Zit
aide de excel Round(expression [,numdecimalplaces])
La syntaxe de la fonction Round comprend les éléments suivants :
Élément Description expression Expression numérique arrondie. numdecimalplaces Facultatif. Nombre indiquant combien de positions à droite de la virgule sont incluses dans le nombre arrondi. Si cette valeur est omise, les entiers sont arrondis par la fonction Round.
Voila la soluce NbH = Round(Mb/60 , 2) arrondi a 2 decimales
Zit
"Excel...lent" a écrit dans le message de news:
Bonjour à tous,
Avec cette formule je récupère un entier à partir d'un décimal : NbH > Ent(Mb / 60)
Je souhaiterais faire la même chose en VBA mais ça Bug.
Merci de votre aide.
Excel...lent
aide de excel
Round(expression [,numdecimalplaces])
La syntaxe de la fonction Round comprend les éléments suivants :
Élément Description
expression Expression numérique arrondie.
numdecimalplaces Facultatif. Nombre indiquant combien de positions à
droite de la virgule sont incluses dans le nombre arrondi. Si cette valeur
est omise, les entiers sont arrondis par la fonction Round.
Voila la soluce
NbH = Round(Mb/60 , 2)
arrondi a 2 decimales
Zit
"Excel...lent" <vpco@free.fr> a écrit dans le message de news:
OmIuj6IDGHA.208@TK2MSFTNGP10.phx.gbl...
Bonjour à tous,
Avec cette formule je récupère un entier à partir d'un décimal : NbH > Ent(Mb / 60)
Je souhaiterais faire la même chose en VBA mais ça Bug.
aide de excel Round(expression [,numdecimalplaces])
La syntaxe de la fonction Round comprend les éléments suivants :
Élément Description expression Expression numérique arrondie. numdecimalplaces Facultatif. Nombre indiquant combien de positions à droite de la virgule sont incluses dans le nombre arrondi. Si cette valeur est omise, les entiers sont arrondis par la fonction Round.
Voila la soluce NbH = Round(Mb/60 , 2) arrondi a 2 decimales
Zit
"Excel...lent" a écrit dans le message de news:
Bonjour à tous,
Avec cette formule je récupère un entier à partir d'un décimal : NbH > Ent(Mb / 60)
Je souhaiterais faire la même chose en VBA mais ça Bug.
Merci de votre aide.
Excel...lent
AV
| Voila la soluce | NbH = Round(Mb/60 , 2) | arrondi a 2 decimales
Si j'étais toi je serais beaucoup moins péremptoire lorsqu'il s'agit de la fonction vba "Round" .....
Sub zzz() 'avec la fonction vba...pas terrrible : 'arrondi à l'entier pair le plus proche ! MsgBox Round(0.5, 0)'avec XL97 --> plouf ! MsgBox Round(1.5, 0)
MsgBox VBA.Round(0.5, 0) MsgBox VBA.Round(1.5, 0)
'Ici c'est nettement plus cohérent... MsgBox Application.Round(0.5, 0) 'ou avec WorksheetFunction MsgBox Application.Round(1.5, 0)
MsgBox [round(0.50,0)] 'méthode Evaluate MsgBox [round(1.50,0)] End Sub
AV
| Voila la soluce
| NbH = Round(Mb/60 , 2)
| arrondi a 2 decimales
Si j'étais toi je serais beaucoup moins péremptoire lorsqu'il s'agit de la
fonction vba "Round" .....
Sub zzz()
'avec la fonction vba...pas terrrible :
'arrondi à l'entier pair le plus proche !
MsgBox Round(0.5, 0)'avec XL97 --> plouf !
MsgBox Round(1.5, 0)
MsgBox VBA.Round(0.5, 0)
MsgBox VBA.Round(1.5, 0)
'Ici c'est nettement plus cohérent...
MsgBox Application.Round(0.5, 0) 'ou avec WorksheetFunction
MsgBox Application.Round(1.5, 0)
MsgBox [round(0.50,0)] 'méthode Evaluate
MsgBox [round(1.50,0)]
End Sub
| Voila la soluce | NbH = Round(Mb/60 , 2) | arrondi a 2 decimales
Si j'étais toi je serais beaucoup moins péremptoire lorsqu'il s'agit de la fonction vba "Round" .....
Sub zzz() 'avec la fonction vba...pas terrrible : 'arrondi à l'entier pair le plus proche ! MsgBox Round(0.5, 0)'avec XL97 --> plouf ! MsgBox Round(1.5, 0)
MsgBox VBA.Round(0.5, 0) MsgBox VBA.Round(1.5, 0)
'Ici c'est nettement plus cohérent... MsgBox Application.Round(0.5, 0) 'ou avec WorksheetFunction MsgBox Application.Round(1.5, 0)
MsgBox [round(0.50,0)] 'méthode Evaluate MsgBox [round(1.50,0)] End Sub
AV
Clément Marcotte
M'est avis que t'as mal lu. Le monsieur il veut tronquer, pas arrondir.
"Zit" a écrit dans le message de news:
aide de excel Round(expression [,numdecimalplaces])
La syntaxe de la fonction Round comprend les éléments suivants :
Élément Description expression Expression numérique arrondie. numdecimalplaces Facultatif. Nombre indiquant combien de positions à droite de la virgule sont incluses dans le nombre arrondi. Si cette valeur est omise, les entiers sont arrondis par la fonction Round.
Voila la soluce NbH = Round(Mb/60 , 2) arrondi a 2 decimales
Zit
"Excel...lent" a écrit dans le message de news:
Bonjour à tous,
Avec cette formule je récupère un entier à partir d'un décimal : NbH >> Ent(Mb / 60)
Je souhaiterais faire la même chose en VBA mais ça Bug.
Merci de votre aide.
Excel...lent
M'est avis que t'as mal lu. Le monsieur il veut tronquer, pas arrondir.
"Zit" <nospam-bvt54@hotmail.com> a écrit dans le message de news:
e4hK9WgDGHA.2036@TK2MSFTNGP14.phx.gbl...
aide de excel
Round(expression [,numdecimalplaces])
La syntaxe de la fonction Round comprend les éléments suivants :
Élément Description
expression Expression numérique arrondie.
numdecimalplaces Facultatif. Nombre indiquant combien de positions à
droite de la virgule sont incluses dans le nombre arrondi. Si cette valeur
est omise, les entiers sont arrondis par la fonction Round.
Voila la soluce
NbH = Round(Mb/60 , 2)
arrondi a 2 decimales
Zit
"Excel...lent" <vpco@free.fr> a écrit dans le message de news:
OmIuj6IDGHA.208@TK2MSFTNGP10.phx.gbl...
Bonjour à tous,
Avec cette formule je récupère un entier à partir d'un décimal : NbH >> Ent(Mb / 60)
Je souhaiterais faire la même chose en VBA mais ça Bug.
M'est avis que t'as mal lu. Le monsieur il veut tronquer, pas arrondir.
"Zit" a écrit dans le message de news:
aide de excel Round(expression [,numdecimalplaces])
La syntaxe de la fonction Round comprend les éléments suivants :
Élément Description expression Expression numérique arrondie. numdecimalplaces Facultatif. Nombre indiquant combien de positions à droite de la virgule sont incluses dans le nombre arrondi. Si cette valeur est omise, les entiers sont arrondis par la fonction Round.
Voila la soluce NbH = Round(Mb/60 , 2) arrondi a 2 decimales
Zit
"Excel...lent" a écrit dans le message de news:
Bonjour à tous,
Avec cette formule je récupère un entier à partir d'un décimal : NbH >> Ent(Mb / 60)
Je souhaiterais faire la même chose en VBA mais ça Bug.
