VBA, arrondi 2 décimales après la virgule

Fermé
Bwabwa - 30 avril 2010 à 16:17
 dd - 12 févr. 2018 à 15:09
Bonjour,

j'ai créé un userform dans lequelle j'insère des données par ce moyen :
prix.Text = Worksheets(1).Range("V" & numLigCourante).Value & " €"

le pb est que certains prix sont trop longs, avec plusieurs chiffres après la virgule..
je souhaterais afficher ces prix, arrondis et sans décimales.

Comment ça marche ?

j'ai pensé à
1 - arrondir en appliquant la fonction arrondir sur les 3 colonnes de prix concernées, puis
2 - insérer les valeurs dans les textbox correspondantes en utilisant le code ci dessus, mais il faudrait répérer la position de la prenthèse et ne recopier que ce qu'il y a avant celle-ci.

j'ai déja réfléchit aux Len Left IsString..mais je suis débutant VBA, c'est compliqué, pourriez vous m'aider s'il vous plait ?

merci d'avance

2 réponses

Gord21
Messages postés
918
Date d'inscription
samedi 21 novembre 2009
Statut
Membre
Dernière intervention
20 mars 2013
287
30 avril 2010 à 20:52
Bonsoir,
Est-ce que cette solution te convient :
prix.Text = Round(Worksheets(1).Range("V" & numLigCourante).Value & " €", 2)

@+
3
Bonjour, exusez moi de donner des nouvelles aussi tardivement.
Je viens de tester la solution proposée et elle fonctionne parfaitement bien.
Je vous remercie ! :)
0
Merci pour ce bout de code!!!!
0