Eliminer les chiffres d'une cellule

Bonjour,

je voudrais extraire une chaine de lettre d'une cellule qui contient aussi des chiffres

exemple:

CFA.OR1.SAEIV.SAE.3.1.1

devient

CFA.OR1.SAEIV

ci joint le fichier Excel

Bonjour,

Le plus pratique reste une fonction personnalisée.

Function EPURERCODE(codequip As String) As String
    Dim ceq, i%
    Application.Volatile
    ceq = Split(codequip, ".")
    For i = UBound(ceq) To 0 Step -1
        If IsNumeric(ceq(i)) Then
            ceq(i) = "@"
        Else
            Exit For
        End If
    Next i
    EPURERCODE = Replace(Join(ceq, "."), ".@", "")
End Function

Cordialement.

bonjour

un essai a tester

9amiway.xlsx (100.94 Ko)

cordialement

Merci,

ça marche.


solution de MFerrand

Rechercher des sujets similaires à "eliminer chiffres"