Bonsoir a toutes et tous, Forum bonsoir

Je souhaiterai svp adapter une ligne de code voir code en remarque au
format monétaire.

j'ai beau essayer , ca marche pas bien.

Merci de votre aide et pour votre temps.

Une bonne soirée a vous

Cordialement Ray

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
 
Private Sub Combobox2_Click()
   If ComboBox2.ListIndex = -1 Then Exit Sub
 
     '** TextBox2 = Format(TextBox2, "##,##0.00 €")
 
'*** Mettre le code ci dessous au format > > >    "##,##0.00 €"
 
TextBox2 = Ws.Cells(21, 5 + ComboBox2.ListIndex) & " €"
 
End Sub