Extraire une chaine de caractère d'une cellule

Bonjour,

Dans une feuille de calcul dans la colonne C, j'ai du texte dont je voudrai extraire une partie dans la colonne D. J'ai essayé avec stx, nbcar, cherche en essayant de combiner avec la fonction SI mais je tourne en rond.

Exemple :

COLONNE C COLONNE D

Mairie d'XXX XXX

Mairie de YYYYY YYYYY

Association Tartampion

Mairie WWWWWW WWWWWWW

Ce que je souhaite faire c'est récupérer en colonne D le nom de la collectivité uniquement si les cellules de la colonnes C contiennent le mot Mairie

Si vous avez une piste je vous en serai reconnaissant.

Merci beaucoup

Bonjour

Une solution...

=SI(EQUIV("Mairie"&"*";C1);STXT(C1;7;100))

Merci pour votre réponse, mais ça ne fonctionne pas.

Je continue à chercher de mon côté.

Ah bon...

29classeur1.zip (3.39 Ko)

Voilà ce que ça donne chez moi dans le fichier joint :

en réponse parfois #N/A (exemple en B3) ou alors cela reprend une partie de la chaîne de caractère même s'il n'y a pas MAIRIE (exemple B4)

Et si c'est MAIRIE DE qui est utilisé je retrouve un espace avant le nom de la commune (exemple B6)

Je n'avais peut être pas été assez précis, désolé.

Cordialement

18classeur2.zip (8.54 Ko)

Voilà j'ai corrigé les problèmes que j'ai trouvé

Problème de l'espace : résolu.

Problème du N/A résolu.

Problème avec EPHAD résolu.

33classeur2.zip (8.61 Ko)

Bonsoir à tous

Un petite fonction personnalisée à tester évidemment par le forum

Cdlt

Option Explicit
Public Function Ville(Cellule)
Dim temp As String

    If Cellule = "" Or Mid(Cellule, 1, 6) <> "Mairie" Then
        Ville = ""
        Exit Function
    Else
        temp = LTrim(Mid(Cellule, 7, Len(Cellule)))
        MsgBox temp
            If Mid(temp, 1, 2) = "de" Then
                temp = Trim(Mid(temp, 4, Len(Cellule)))
            End If
            If Mid(temp, 1, 2) = "d'" Then
                temp = Trim(Mid(temp, 3, Len(Cellule)))
            End If
    End If

    Ville = temp

End Function
24osnola-v1.zip (9.89 Ko)

Merci Lean,

C'est nickel ça marche.

Je mets la macro de côté et je vais la tester.

Bonne journée à vous.

Bonne journée également.

Rechercher des sujets similaires à "extraire chaine caractere"