Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Access format

format

3 réponses
Avatar
lou
bonjour
petit probleme de nombre
ex 1 138,4569
ou ex 2 14,568

en fait je veux laisser 2 chiffres apres la virgule
ex 1 138,45
ou ex 2 14,56

je ne veux pas formater
ni emplyer la fonction round


comment faire
merci de votre aide
Signaler un problème avec ce contenu

3 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
Avatar
Anor
Bonjour,

lou wrote:
| bonjour
| petit probleme de nombre
| ex 1 138,4569
| ou ex 2 14,568
|
| en fait je veux laisser 2 chiffres apres la virgule
| ex 1 138,45
| ou ex 2 14,56
|
| je ne veux pas formater
| ni emplyer la fonction round
|
|
| comment faire
| merci de votre aide

euh.... ça limite pas mal les choses de ne pas pouvoir utiliser les outils intégrés
comme format(lenombre,"0.00") ou modifier le nombre de décimales du champ à 2.

Alors tu modifies le type de champ de la table en Monétaire....
sinon, avant de répondre que tu ne peux pas, dis aussi pourquoi,
si c'est une touche qui manque sur ton clavier
ou si c'est parce que tu affiches la valeur dans une fenêtre virtuelle ?

;-)))

--
à+
Arnaud
--------------------------------------------------
Conseils d'utilisation : http://users.skynet.be/mpfa/
Access Memorandum : http://memoaccess.free.fr
/Réponses souhaitées sur ce forum, merci/
--------------------------------------------------
Avatar
pat
Salut LOU,

s'il s'agit pour toi d'arrondir un nombre résultant
d'un calcul en respectant la règle dite "fiscale" (désolé)
7.456 donne 7.46
7.454 donne 7.45
7.455 donne 7.46
tu peux utiliser ce module

@ plus Patrick

'**********************
Public Function FISCAL(ByVal NOMBRE As Variant) As Variant
' Arrondi fiscal à deux décimales NOMBRE : donnée à arrondir
On Error GoTo gestErr
Dim MULTI As Long
Dim VARTMP As Variant
Dim SIGNE As Integer
Dim DEC As Integer
FISCAL = 0
DEC = 2 ' arrondi sur 2 décimales
If Not IsNumeric(NOMBRE) Then
Exit Function
End If
MULTI = 10 ^ DEC
SIGNE = Sgn(NOMBRE)
NOMBRE = Abs(NOMBRE)
VARTMP = CDec(NOMBRE) * MULTI + 0.5
FISCAL = SIGNE * Int(VARTMP) / MULTI
ExitHere:
Exit Function
gestErr:
Select Case Err.Number
Case Else
MsgBox "FISCAL - Erreur N°" & Err.Number & " : " &
Err.Description, vbCritical
End Select
Resume ExitHere
End Function
'*****************
"lou" a écrit dans le message de
news:40856e81$0$11085$
bonjour
petit probleme de nombre
ex 1 138,4569
ou ex 2 14,568

en fait je veux laisser 2 chiffres apres la virgule
ex 1 138,45
ou ex 2 14,56

je ne veux pas formater
ni emplyer la fonction round



Avatar
Raymond [mvp]
Bonjour.

si tu ne veux pas formater ni utiliser round, tu ne veux sûrement pas
utiliser d'autres fonctions de conversion. Donc il faut trouver des types de
données tout fait avec 2 décimales. il n'y a qu'un type de données pour les
variables fixes qui est Currency mais avec 4 décimales pour permettre les
calculs financiers.
il te reste la fonction suivante:
Montant = Int(Montant * 100) / 100
ce n'est pas un formatage ni un arrondi mais ça y resssemble.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"lou" a écrit dans le message de
news:40856e81$0$11085$
bonjour
petit probleme de nombre
ex 1 138,4569
ou ex 2 14,568

en fait je veux laisser 2 chiffres apres la virgule
ex 1 138,45
ou ex 2 14,56

je ne veux pas formater
ni emplyer la fonction round


comment faire
merci de votre aide