separer les chiffres des lettres

Nicolas Lepauvre

XLDnaute Junior
Bonjour à tous.
Comment séparer les chiffres des lettres?
 

Pièces jointes

  • chiffres et lettres.xlsx
    8.1 KB · Affichages: 58

eriiic

XLDnaute Barbatruc
Bonjour,

en retard car interrompu mais vu que c'est fait je met quand même.
Une fonction à mettre dans un module standard :
VB:
Function num(ch As String, Optional typeCar As Boolean = True) As String
    Dim typ As Boolean, p As Long
    For p = 1 To Len(ch)
        typ = Mid(ch, p, 1) Like "#"
        If typ = typeCar Then num = num & Mid(ch, p, 1)
    Next p
End Function
Syntaxe sur feuille :
chiffres : =num(B3)
autres caractères : =num(B3;FAUX)
eric
 

Discussions similaires

Réponses
116
Affichages
3 K
Réponses
3
Affichages
494

Statistiques des forums

Discussions
311 720
Messages
2 081 915
Membres
101 837
dernier inscrit
Ugo