Fusionner 2 / +ieurs cellules avec contenu de chacune à la ligne Fermé

Question

Bonjour à tous,

Après lecture de différents sujets sur le forum, je désespère de trouver une réponse à ma question, raison pour laquelle j'ouvre un nouveau sujet.

Je suis sous Windows et Excel 2010.

Je voudrais comme le titre du post l'indique créer une macro permettant de fusionner dans une seule cellule le contenu de plusieurs cellules tout en conservant le contenu de chacune des cellules avec un retour à la ligne.

Pour expliciter mon propos, vous trouverez attaché une capture d'écran, j'ai la colonne A et je voudrais arriver à B.

Merci par avance pour votre aide !! :-)

via55 · Answer

Bonsoir

Pourquoi vouloir fusionner des cellules ce qui est une plaie après pour les formules et les macros !
Il suffit dans le Format de cellule Alignement de cocher Renvoyer à la ligne

Le hic pour régler ton problème par macro c'est de savoir quelles lignes sont à concatener et combien , dans ton exemple il y en a d'abord 2 puis 3 !
Par contre on peut créer une fonction personnalisée par laquelle  tu pourrais rentrer l'adresse de la 1ere cellule et l'adresse de la dernière et le résultat concaténé s'afficherait dans la cellule de la fonction

Qu'en dis tu ?

Cdlmnt

Gyrus · Answer

Bonjour,

Tu peux tester cette macro
Sub Test()Dim Cel As RangeDim Texte As String    Selection.Offset(0, 1).Merge    For Each Cel In Selection        Texte = Texte & Cel & Chr(10)    Next Cel    Selection.Offset(0, 1) = Left(Texte, Len(Texte) - 1)End Sub
Dans un premier temps, tu sélectionnes la plage concernée puis tu lances la macro.

A+

Ridlou · Answer

Bonjour,

Merci pour vos réponses et votre aide.
Je n'ai pas créé le fichier de départ, c'est une extraction vers excel d'un traitement de données, mais pour pouvoir l'exploiter j'ai besoin de fusionner certaines cellules.
Je vais essayer la macro conseillé par Gyrus.
Je vous tiens au courant, merci beaucoup.

Fusionner 2 / +ieurs cellules avec contenu de chacune à la ligne

3 réponses

Discussions similaires

Newsletters