XL 2016 Recuperer les valeurs d'une somme dans plusieurs cellules [Résolu]

didier09

XLDnaute Occasionnel
Bonsoir le Forum,

Est-il possible de récupérer les valeurs additionnées dans une formule et les insérer séparément dans plusieurs cellules :
Exemple formule en A1 = 12+25+45+83+45
Récupérer chaque valeur séparément C1=12, D1=25, E1=45,....
Le nombre de valeurs peut différer.
Merci de vos retours.

Didier
 

Victor21

XLDnaute Barbatruc
Supporter XLD
Bonsoir, didier09.

Quand les développeurs de Redmond ont mis au point Données, Convertir, (Séparateur = "+") ils savaient déjà que vous en auriez besoin.
Forts, les boys ! :eek:

Edit : Bonsoir à toi aussi, Staple1600. Alors comme ça, on sort la grosse artillerie ?
 

Staple1600

XLDnaute Barbatruc
Bonsoir

En attendant mieux ;)
VB:
Sub Macro1()
Dim t
[B1] = "=FORMULATEXT(A1)": [B1] = Replace([B1].Text, "=", "")
t = Split([B1], "+")
[C1].Resize(, UBound(t) + 1) = t
Columns(2).Delete
End Sub
 

Staple1600

XLDnaute Barbatruc
Bonsoir Victor21

Honte à moi!
J'avais pensé à Données/Convertir mais je n'avais essayé sur une formule
(pensant à tort que cela ne fonctionnait que sur des strings)
Je viens de réparer cet impardonnable oubli.

Je vote donc pour la solution Données/Convertir et je pars en pénitence ;)
 

didier09

XLDnaute Occasionnel
Merci à tous les deux pour vos réponses éclair ⚡.

J'essaie et reviens vers vous.

Didier
 

didier09

XLDnaute Occasionnel
Re,

Super, je connaissais pas cette fonction. C'est top.
Encore merci.
Bonne soirée
Didier
 

Créez un compte ou connectez vous pour répondre

Vous devez être membre afin de pouvoir répondre ici

Créer un compte

Créez un compte Excel Downloads. C'est simple!

Connexion

Vous avez déjà un compte? Connectez vous ici.

Haut Bas