Concatener une plage

Bonjour le forum,

Je cherche une solution simple en formule ou en VBA pour concaténer les cellules d'une plage (colonne).

Je n'ai rien trouvé qui fonctionne.

J'ai utilisé la formule qui ressort souvent : =CONCATENER(A2:A42) mais elle en fonctionne pas.

Dans ce fichier l'idée est d'avoir une liste d'adresses mail (évolutive) qui sont ensuite concaténées dans une seule cellule de manière à pouvoir être réinjecté en un simple copier/coller dans un mail (ici outlook).

Je vous remercie pour votre aide.

Bonjour

A tester

=CONCAT(A1:A41)

Cordialement

Bonjour,

J'enfonce peut-être une porte ouverte (mais ce serait dommage de passer à côté) : si tu copies ta plage de cellules contenant les adresses et que tu colles directement dans la zone d'adresses d'Outlook (éventuellement en cliquant sur "Vérifier les noms"), toutes les adresses seront automatiquement séparées par des ';'

Et si la solution ne convient pas, mettre le code ci-dessous dans un module standard et enregistrer le fichier au format .xlsm

Function listeAdresses(plage As Range, séparateur As String)
For Each cel In plage
    If cel <> "" Then ch = ch & séparateur & cel
Next cel
listeAdresses = Mid(ch, 1, Len(ch) - 1)
End Function

Une fonction personnalisée est ainsi rendue disponible dans le classeur. Elle s'utilise ensuite (en A43, par exemple) sous la forme

=listeAdresses(A1:A41;";")

La fonction ignore les cellules vides dans la plage (mais ne vérifie pas la validité des adresses renseignées dans cette même plage)

Bonjour à tous les deux,

Joco7915 malheureusement votre solution renvoi un erreur #NOM. Peut être que ce nom de fonction est un nom anglais et ne fonctionne pas sur un Excel en français.

U. Milité, une nouvelle fois merci pour votre réponse. C'est en effet encore plus simple que ce que je pensais. Coller la liste dans la zone d'adresse fonctionne très bien.

Par curiosité, j'ai quand même testé la fonction qui fonctionne aussi très bien si d'autre sont intéressés un jour.

Je garde donc la solution la plus simple de copier coller la liste. Désolé pour le dérangement inutile.

Merci beaucoup pour votre aide.