Macro pour délimiter une chaine de texte, séparé par un "-"

Bonjour,

j'ai besoin de votre aide pour délimiter une chaîne de ville, séparer par "-". Par exemple

Paris La Défense-Paris OrlySud-Orléans-Bourges-Clermont-Ferrand

A aujourd'hui, je fais Données -> Convertir -> Délimiter -> "-"

Le problème est: il y a des noms de villes contient des "-", comme Clermont-Ferrand, Saint-Gervais-les-Bains, Aix-en-Provence...

Je dois ensuite les traiter manuellement tous les mois, et ça prend énormément de temps.

Est-ce qu'il y a une possibilité de faire un macro ?

je vous remercie pour votre aide

Bonjour Isabelle, bonjour le forum,

La macro va rencontrer exactement le même problème que toi. Comment lui faire savoir que le tiret sépare deux villes ou est compris dans le nom d'une ville. C'est impossible !...

Bonjour,

une solution possible en gérant une liste des noms de ville contenant le caractère "-" (feuille exceptions), liste à compléter en fonction des besoins, puis lancer la macro aargh via alt-F8

Sub aargh()
    Set ex = Sheets("exceptions")
    With Sheets("sheet1")
        i = 2
        While ex.Cells(i, 1) <> ""
            tr = Replace(ex.Cells(i, 1), "-", "@")
            .Cells.Replace ex.Cells(i, 1), tr
            i = i + 1
        Wend
        .Columns(1).TextToColumns Destination:=.Range("B1"), DataType:=xlDelimited, _
                                  TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=False, _
                                  Semicolon:=False, Comma:=False, Space:=False, Other:=True, OtherChar:="-"
        Set ex = Nothing
        .Cells.Replace "@", "-"
    End With
End Sub

Merci Beaucoup h2so4,

ça marche parfaitement!!!!!!

mille merci

Bonjour le fil, le forum,

Je dis chapeau Môssieu H2So4 !...