[Excel 2007] Problème avec format monétaire dans une TextBox

Bonjour, je m'appelle Dimitri.

Je poste ce message, parce que je développe une application dans le programme Excel 2007, et je suis confronté à un problème pratique.

J'ai parcouru un peu le forum pour lire les problèmes similaires au mien, et les solutions proposées. Mais je n'ai pas trouvé une solution pour me dépanner. Alors j'explique...

Par code VBA, j'ai appliqué le format monétaire à une TextBox d'un formulaire. Cela, OK, ça marche... Mais lorsque le montant en Euros apparait dans la TextBox en question, sa valeur est multiplié par 10.

Voici le code VBA du formulaire. Si vous trouvez une solution...

Option Explicit

Private Sub UFModifArtCB01_Change()

    'Copie de la valeur de la liste CB01 dans la cellule Z5
    Range("Articles!Z5").Value = UFModifArtCB01.Value

    'Copie des valeurs de la recherche verticale à partir
    'de la cellule Z5 dans les zones de texte du formulaire
    '"Modification d'une fiche article"
    UFModifArtTB01.Value = Range("Articles!Z6").Value
    UFModifArtTB02.Value = Range("Articles!Z7").Value
    UFModifArtTB03.Value = Range("Articles!Z8").Value
    UFModifArtTB04.Value = Range("Articles!Z9").Value
    UFModifArtTB05.Value = Range("Articles!Z10").Value

End Sub

Private Sub btnCloseUFModifArt_Click()
'Fermeture du formulaire "Modification d'une fiche article"

    Unload Me
    'UFModifArt.Hide

End Sub

Private Sub UFModifArtTB05_Change()

    UFModifArtTB05.Value = Format(UFModifArtTB05.Value, "#,##0.00 €")
    'UFModifArtTB05.Value = Range("Articles!Z10").Value / 10

End Sub

Comme vous le voyez dans ce code VBA, j'essaie d'appliquer la combine qui consiste à diviser le montant dans la TextBox UFModifArtTB05, mais Excel 2007 plante (aïe!!) et je suis obligé de relancer le logiciel. Donc j'ai désactive cette ligne, en mettant un signe commentaire devant, " ' ".

Je peux mettre le fichier .xlsm en pièce jointe, pour que vous testiez, mais il est assez volumineux: 1.5 Mo.

Merci de m'aider! J'attends vos réponses éventuelles...

Bonjour,

Teste en modifiant le format pour l'euro comme ceci

"# ##0.00 €"

Merci, ça marche!