Excel majuscule accentuée avec fonction majuscule

Bonjour à tous,

Voici une petite question peut être sans solution pratique, juste à savoir s'il y a une possibilité :

Lorsque je converti en majuscule avec la fonction appropriée, le texte prend des majuscules accentuées bien que j'ai décoché la case dans les options.

Je souhaiterai une conversion sans majuscules accentuées. Il y a t'il une option simple et pratique (hormis un lambda ou autre transformation un peu plus fastidieuse)?

Je vous remercie et vous souhaite un excellent weekend

Doli

Bonjour Doli,

J'ai trouvé ce code sur le net qui permet de faire ce que tu veux, à insérer dans un nouveau module :

(Ce n'est pas de moi, je ne pourrai donc pas te proposer de maintenance !)

Function ConvertirSansAccents(texte As String) As String
    Dim accents As String
    Dim sansAccents As String
    Dim i As Integer

    accents = "ÀÁÂÃÄÅÇÈÉÊËÌÍÎÏÐÑÒÓÔÕÖÙÚÛÜÝ"
    sansAccents = "AAAAAACEEEEIIIIDNOOOOOUUUUY"

    texte = UCase(texte)

    For i = 1 To Len(accents)
        texte = Replace(texte, Mid(accents, i, 1), Mid(sansAccents, i, 1))
    Next i

    ConvertirSansAccents = texte
End Function

Tu peux ensuite utiliser la fonction dans Excel : Dans une cellule, tu tapes =ConvertirSansAccents(A1) pour convertir le texte de la cellule A1 en majuscules sans accents.

Note : J'ai essayé, ça fonctionne

Sinon : Par formule, imbrications a créer autant de fois que nécessaire.

=SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(A1; "É"; "E"); "È"; "E"); "Ê"; "E"); "Ë"; "E"); "À"; "A")

A la place de A1, tu peux y intégrer directement la fonction MAJUSCULE(A1).

Merci pour votre réponse. Effectivement il y a des solutions "travaillées" et intéressantes. Je suis étonnée de ce fonctionnement de la fonction majuscule.

Parfait pour la macro!

A nouveau merci et bon weekend