Séparer une chaîne de caractère avec une Majuscule comme sép

Bonjour

je voulais savoir si c'est possible de séparer une chaîne de caractère avec une Majuscule comme séparateur

Exemple: JosephKeller -> Joseph Keller

Merci pour votre assistance.

voila exactement le type de donnée que j'ai dans mon Excel

George PapanicolaouNew York University

Joseph HarrisHarvard University

Steven KleimanHarvard University

Boris GnedenkoLomonosov Moscow State University

Prenom NomUniversité

Help Help :/

Bonjour,

Par formules, c'est un peu compliqué. Le moyen le plus simple est une fonction personnalisée :

Function SEPARMAJ(ch As String) As String
    Dim i%
    Application.Volatile
    ch = Trim(ch)
    For i = Len(ch) To 2 Step -1
        If Mid(ch, i, 1) Like "[A-Z]" And Mid(ch, i - 1, 1) <> " " Then
            ch = Left(ch, i - 1) & " " & Right(ch, Len(ch) - i + 1)
        End If
    Next i
    SEPARMAJ = ch
End Function

A placer dans un module standard, et utiliser comme n'importe quelle fonction d'Excel.

On peut aussi l'utiliser avec une macro qui opèrera les modifications sur place...

Cordialement.

Merci infiniment ! le code est parfait !