Affichage USF ?

[paul]

Bonjour a tous,

Voila j'ai un UserForm1 qui doit me récureper les infos de ma Feuil1 (voir fichier joint).

Dans ma feuille j'ai un calcul entre les cellules Prix HT et TTC.

Mon problème est que dans l'UserForm je recupere les données avec plusieurs decimales après la virgule - comment faire pour afficher dans mon UserForm que 2 decimales (après la virgule).

merci d'avance

paul

 

[JPM]

Salut à tous

Essaye ça

Private Sub ListBox1_Click() ' <<<<LE PREMIER CLICK
NomLBindex = ListBox1.ListIndex + 2
TextBox1 = Sheets("feuil1").Range("A" & NomLBindex)
TextBox2 = Format(Sheets("feuil1").Range("B" & NomLBindex), "###0.00" & " €")
TextBox3 = Format(Sheets("feuil1").Range("C" & NomLBindex), "###0.00" & " €")
End Sub

A+
JPM

 

[paul]

Bonjour JPM et merci beaucoup pour ton aide

Ca marche nickel.

@ + paul