Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

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
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 !

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
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…