Faire la somme de plusieurs chiffres dans la même céllule

Bonjour à tous

Dans une même cellule, j'ai entre 2 et 5 chiffres en retour à la ligne et je voudrais en faire la somme, est-ce possible ?

Votre aide me serait précieuse car je ne trouve pas la solution

ex:

En A1 j'ai:

2000

1550

880

690

J'aimerais obtenir en B1:

5120

Merci à vous

@+

Robert

Bonjour Body71C

Oui c'est possible, mais avec une fonction personnalisée

Voici la fonction

Function SommeNombres(Rng As Range)
  Dim Ind As Integer, TabVal() As String, Total As Single
  ' Rendre la fonction volatile : doit être recalculée chaque fois qu'un calcul est effectué
  Application.Volatile
  ' Définir le tableau des valeurs séparées par un retour à la ligne
  TabVal = Split(Rng, Chr(10))
  ' Initialiser à ZERO le total
  Total = 0
  ' Pour chaque valeur du tableau, faire la somme
  For Ind = 0 To UBound(TabVal)
    Total = Total + Val(TabVal(Ind))
  Next Ind
  ' Renvoyer la somme à la fonction
  SommeNombres = Total
End Function

La formule à mettre dans la feuille

=sommenombres(A1)

Si A1 contient tes valeurs

A+

Bonjour

Par formules :

Amicalement

Nad

Bonjour BrunoM45

Merci pour cette réponse très rapide.

Je dois être une quich car ça ne fonctionne pas.

Je joint le fichier.

Merci

@+

Robert

Bonjour Nad

Merci pour ta réponse.

Je voudrais éviter de rajouter des colonne car mon fichier est déjà très encombré.

@+

Robert

Re,

Si tu oublies le principal, à savoir la fonction personnalisée

effectivement ça ne peut pas fonctionner

A+

Je suis tellement habitué à l'avoir en automatique au boulot que je n'y avais pas pensé.

Merci beaucoup

@+

Robert