XL 2016 [RESOLU]Format monétaire + texte

[louatt]

Bonjour à tous,

j'utilise la formule ci-dessous pour associer du texte à une formule somme. Est-il possible de modifier ce code pour afficher le résultat de la somme en format monétaire français ? (000, 00 €)

Par avance je vous remerce.

Cordialement.

="SOMME TOTALE: "&SOMME(E2:E28)

 

[jmfmarques]

Bonjour
Ce n'est pas la valeur de la cellule, qu'il faut modifier, mais uniquement son format (cellule -->> format --->> "SOMME TOTALE " #,## €)
La formule, elle, ne doit inclure rien d'autre que la valeur propre --->>
=SOMME(E2:E28)

 

[louatt]

Bonjour,

oui effectivement c'est plus logique, merci pour la solution.

Cordialement.

 

[louatt]

Dernière petite question si je souhaite faire afficher en rouge uniquement le résultat monétaire comment dois-je mettre mon code?
J'ai essayé le code ci-dessous mais ça ne fonctionne pas

"SOMME TOTALE :" ;[Rouge]- 0,00 €

par avance merci

 

[jmfmarques]

On ne peut s'amuser ainsi avec le formatage.
UNE COULEUR à la fois (et c'est tout et uniquement pour des données numériques, ce qui est le cas)

 

[louatt]

Ok merci de la réponse .

Bonne fin de journée

 

[Modeste geedee]

alors pour s'amuser :

[Bleu]"SOMME TOTALE : "* 0,00 €;[Rouge]"SOMME TOTALE : "-* 0,00 €;[Vert]"reliquat :"* 0___ €;

 

[job75]

Bonjour louatt, jmfmarques, Modeste geedee,

Si l'on veut colorer partiellement le texte du résultat il faut du VBA, voyez le fichier joint :

Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
With [E29] 'à adapter
    .Value = "SOMME TOTALE : " & Format([SUM(IF(ISNUMBER(E2:E28),E2:E28))], "#,##0.00 €") 'plage à adapter
    .Characters(1, 15).Font.ColorIndex = xlAutomatic
    .Characters(16).Font.ColorIndex = 3 'police rouge
End With
Application.EnableEvents = True
End Sub

La macro se déclenche quand on valide ou modifie une cellule quelconque.

Notez que le calcul de la somme est matriciel pour éviter les valeurs d'erreur.

A+