JOINDRE.TEXTE sans Office 365 ? Possible ?

Bonjour à tous,

Je ne dispose pas de la fonction JOINDRE.TEXTE proposée par Office 365 et j'en aurai grandement besoin.

En effet, je souhaiterai concaténer à la chaine plusieurs cellules :

Colonne A : différents titres de livres dont le nombre varie d'un fichier à l'autre

Colonne B : B1 (texte) : "Il s'agit des livres :"

B2 (texte) : "et"

Le principe serait de mettre en place une chaine de type, pour par exemple 50 livres :

B1 A1 B2 A2 B2 A3 B2 A4 B2 [...] A50

soit "Il s'agit des livres Titre1 et Titre2 et Titre3 et Titre4 et [...] Titre 50"

Y'a-t'il une solution autre que de devoir acheter OFFICE 365 ?

Merci d'avance !

Bonjour,

Je ne suis pas sûr de bien comprendre

Tu veux concaténer plusieurs phrases avec des conjonctions de coordination ?

Voici un fonction perso (JOINDRE) que tu peux adapter à tes besoins. Dans mon exemple, la plage contient tous les mots à assembler pour former la phrase "Il s'agit des livres Titre1 et Titre2 et Titre3 et Titre4" où "Il s'agit des livres" se trouve dans la cellule A1 et les autres dans les cellules A2, A3, Ax. Mot1 est seulement utilisé au début (ici, un espace) et ensuite, Mot2 coordonne ("et" avec un espace devant et un derrière) :

Function JOINDRE(Plage As Range, Mot1 As String, Mot2 As String)

    Dim Cel As Range
    Dim Chaine As String
    Dim I As Long

    For Each Cel In Plage

            I = I + 1
            Chaine = Chaine & Cel & IIf(I = 1, Mot1, Mot2)

    Next Cel

    Chaine = Left(Chaine, Len(Chaine) - Len(Mot2))

    JOINDRE = Chaine

End Function

Utilisation de la formule : =joindre(A1:A4;" ";" et ")

Rechercher des sujets similaires à "joindre texte office 365 possible"