G
Gabriel
Guest
Bonjour à toutes & à tous
Je vous sollicite à nouveau, cette fois ci concernant les formats monétaires dans les textBox, je n'ai malheureusement pas trouvé mon bonheur dans les archives du forum.
J'ai essayé plusieurs formats aucun ne fonctionne...
Je souhaiterais avoir le signe Euro et les décimales qui s'affichent, Ex : 1 500,00 €.
Merci de votre aide.
Gabriel
Je vous sollicite à nouveau, cette fois ci concernant les formats monétaires dans les textBox, je n'ai malheureusement pas trouvé mon bonheur dans les archives du forum.
J'ai essayé plusieurs formats aucun ne fonctionne...
Code:
Private Sub MontantMission_Change()
MontantMission = VBA.Format(MontantMission.Value, ' 0.00 €')
ComClt = format(ComClt, '0.0E+00 ')
ComComHT = format(ComComHT, '0.0E+00 ')
TotalTTC.Value = format(TotalTTC, '0.0E+00 ')
Taxe.Value = format(Taxe.Value, '#,##0.00 €' )
ComClt.Value = Val(MontantMission.Value) * Val(P100Clt.Value) / 100
ComComHT.Value = Val(ComClt.Value) * Val(P100Com.Value) / 100
Taxe.Value = Val(ComComHT.Value) * '19,6' / 100
TotalTTC.Value = Val(ComComHT.Value) + Val(Taxe.Value)Merci de votre aide.
Gabriel