supprimer les lettres

[Olyxier]

Bonsoir le forum
pour enlever ou plutot extraire des chiffres on utilise =extrait_nbre(A?) maintenant si je veus juste enlever les points les lettres dune cellule est garder que les chiffre mais sans les extraire juste en supprimant tout ce qui n'est pas un nombre que faut il faire
merci à vous

 

[Mytå]

Re : supprimer les lettres

Salut Olyxier et le forum

Ta fonction faudrait déjà voir ce qu'il y a dedans

=extrait_nbre(A?) n'est pas une fonction de base d'Excel

A suivre

Mytå

 

[kiki29]

Re : supprimer les lettres

La fonction personnalisée devrait ressembler à qqch comme :

Option Explicit

Public Function SuppLettresPoint(ByVal Cell As Range) As String
Dim L As Long, i As Long
Dim Chaine As String
    L = Len(Cell)
    Chaine = Cell
    For i = 1 To L
        Select Case UCase(Mid(Chaine, i, 1))
          Case "A" To "Z", "."
                Mid(Chaine, i, 1) = " "
      End Select
    Next
    SuppLettresPoint = Trim(Chaine)
End Function

 

[Olyxier]

Re : supprimer les lettres

merci beaucoup et bonne journée