Format montant en Euro dans un msgbox

Question

Je cherche à mettre le contenu d'une cellule dans un message. Le format de la cellule est -1234,10€. Dans mon code Dim mntmsg as long Mon message. Select Case MsgBox(Varmsg1 & Format(Mntmsg, "#0,00€") & Chr(15) & vbLf & Nommsg & vbLf & Varmsg2 & vbLf & Varmsg3, _ vbYesNo + vbExclamation, _ "Message d'avertissement") Case vbNo Exit Sub Case vbYes Comment écrire le code pour obtenir l'affichage : exemple 51,50€ pour mntmsg? Merci d'avance Annette...

Invité · Answer

Copier le vrai code de ta macro, car la rien compris de mettre -1234,10€ en 51,50€ En plus on aura plus de facilité pour adapter car la ton Select Case ? Mytå...

galopin01 · Answer

Format(Mntmsg, "#0 . 00 €")) A+...

Invité · Answer

Galopin ok pour le format mais oufs pour la question.... Copier le vrai code de ta macro, car la rien compris de mettre -1234,10€ en 51,50€...