Concatener une matrice dans une seule cellule

[wg99oe]

Bonjour. Je vous explique mon besoin.

Il consiste à concaténer le contenu d'une matrice (provenant d'une formule matricielle qui peut retourner plusieurs valeurs) dans une seule cellule et dont les éléments sont séparés par des ", ou . etc."

J'ai prix connaissance du fichier "ConcatenerMjx.zip" qui répond à une partie de mon besoin, mais qui limite le nombre de résultats.

Merci à l'avance de votre aide

 

[phlaurent55]

Re : Concatener une matrice dans une seule cellule

Bonjour wg, et bienvenue sur le forum

si tu veux avoir des réponses il serait nécessaire de mettre un fichier représentatif de ton problème ( avec explications un peu plus précises) en pièce jointe

à+
Philippe

 

[wg99oe]

Re : Concatener une matrice dans une seule cellule

Voici le fichier joint qui explique davantage mon besoin.



Merci de votre aide

 

[Tibo]

Re : Concatener une matrice dans une seule cellule

Bonjour,

La solution pourrait peut-être passer par l'installation de la macro complémentaire Morefunc de Laurent Longre, téléchargeable ici par exemple :

Tlcharger Morefunc sur 01net Telecharger.com

On y trouve une fonction appelée MCONCAT

La formule, matricielle, pourrait être :

=MCONCAT(SI($B$2:$B$6=$A8;$A$2:$A$6))

Matricielle, donc à valider par CTRL + MAJ + ENTREE

Pas testé, donc donné sans garantie...

et reste le problème des : à insérer entre chaque lettre

@+

 

[wg99oe]

Re : Concatener une matrice dans une seule cellule

Merci pour la solution mais je recherche quelques choses entièrement inclus dans excel.

Je vais quand même l'essayer

 

[Tibo]

Re : Concatener une matrice dans une seule cellule

re,

...mais je recherche quelques choses entièrement inclus dans excel...

Dans ce cas, ça sera sans doute par macro, mais là, je ne sais pas faire.

Peut-être qu'un Vbaïste averti va passer par là pour te proposer une solution

@+

 

[job75]

Re : Concatener une matrice dans une seule cellule

Bonjour le fil,

Cette macro dans le code de la feuille (clic droit sur l'onglet et Visualiser le code) :

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [A8:A9]) Is Nothing Or Target.Count > 1 Then Exit Sub
Dim cel As Range, txt As String
For Each cel In [B2:B6]
  If cel = Target Then txt = txt & IIf(txt = "", "", ":") & cel.Offset(, -1)
Next
Target.Offset(, 1) = txt
End Sub

Bien adapter les 2 plages entre crochets.

A+

 

[job75]

Re : Concatener une matrice dans une seule cellule

Re,

Avec cette solution, les plages de travail sont déterminées automatiquement :

Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Target.Column > 1 Or Target.Validation.InCellDropdown = False Then Exit Sub 's'il n'y a pas de liste de validation
Dim cel As Range, txt As String
For Each cel In Range([B2], [B2].End(xlDown))
  If cel = Target Then txt = txt & IIf(txt = "", "", ":") & cel.Offset(, -1)
Next
Target.Offset(, 1) = txt
End Sub

Fichier joint.

A+

 

[wg99oe]

Re : Concatener une matrice dans une seule cellule

Merci pour votre aide.

Est-ce que vous croyez qu'il existe quand même une solution qui fonctionne uniquement avec des formules Excel standard ?

 

[Tibo]

Re : Concatener une matrice dans une seule cellule

Bonjour,

S'il y a très peu d'éléments dans ta matrice, c'est possible par formule, c'est ce que tu avais commencé à faire.

Sinon, s'il peut y avoir beaucoup d'éléments, une solution avec colonnes intermédiaires (voir le fichier joint)

@+