format texbox

Pierrot93

XLDnaute Barbatruc

• 21 Mars 2008

• #16

Re : format texbox

Re

aarf, oui il manque certains éléments, correction ci dessous :

Code:

Private Sub tarif_Exit(ByVal Cancel As MSForms.ReturnBoolean)

désolé

 

Vote positif 0 Vote négatif

C

cloclo57

XLDnaute Junior

• 21 Mars 2008

• #17

Re : format texbox

Merci et bien ciblé ,
Cela fonctionne tres bien


Merci encore une fois

 

Vote positif 0 Vote négatif

C

cloclo57

XLDnaute Junior

• 21 Mars 2008

• #18

Re : format texbox

Merci de ton aide

 

Vote positif 0 Vote négatif

wilfried_42

XLDnaute Barbatruc

• 21 Mars 2008

• #19

Re : format texbox

bonjour à tous

erreur de lecture lol comme d'hab ((ai pas vu la virgule)

 

Dernière édition: 21 Mars 2008

Vote positif 0 Vote négatif

B

Bruce68

XLDnaute Impliqué

• 21 Mars 2008

• #20

Re : format texbox

Bonjour à tous

Essaie ceci

Private Sub Tarif_AfterUpdate()
Tarif.Value = Format(Tarif.Value, "0.00 €")
End Sub

 

Vote positif 0 Vote négatif

C

cloclo57

XLDnaute Junior

• 21 Mars 2008

• #21

Re : format texbox

Merci a tous
Pour moi le sujet est clos et ma solution trouvée

Private Sub tarif_Exit(ByVal Cancel As MSForms.ReturnBoolean)
tarif.Value = format(Val(tarif.Value), "###0.00") & " €"
End Sub

Merci le Forum pour votre aide
cloclo57

 

Vote positif 0 Vote négatif