Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2019 Extraire que les chiffres

  • Initiateur de la discussion Initiateur de la discussion Freedal
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Freedal

XLDnaute Junior
Bonjour à tous,🙂
Dans une cellule se trouve une suite de caractère comme "FH124JKd14m3Em" et je souhaiterai
n'extraire que les chiffres de cette suite, en l'occurrence dans cet exemple obtenir "124143"
Merci de votre aide
 
Solution
Sur les versions plus anciennes JOINDRE.TEXTE n'existe pas, utiliser cette fonction VBA :
VB:
Function Extraire_chiffres(t$)
Dim i%, v
For i = 1 To Len(t)
    v = Mid(t, i, 1)
    If IsNumeric(v) Then Extraire_chiffres = Extraire_chiffres & v
Next
End Function
Le code doit être placé impérativement dans un module standard.

Formule en B2 =Extraire_chiffres(A2)
Bonjour Freedal,

Sur Excel 2019 on peut utiliser la fonction JOINDRE.TEXTE, formule matricielle en B2 :
Code:
=JOINDRE.TEXTE("";;SI(ESTNUM(-STXT(A2;LIGNE(INDIRECT("1:"&NBCAR(A2)));1));STXT(A2;LIGNE(INDIRECT("1:"&NBCAR(A2)));1);""))
A valider par Ctrl+Maj+Entrée.

A+
 

Pièces jointes

Sur les versions plus anciennes JOINDRE.TEXTE n'existe pas, utiliser cette fonction VBA :
VB:
Function Extraire_chiffres(t$)
Dim i%, v
For i = 1 To Len(t)
    v = Mid(t, i, 1)
    If IsNumeric(v) Then Extraire_chiffres = Extraire_chiffres & v
Next
End Function
Le code doit être placé impérativement dans un module standard.

Formule en B2 =Extraire_chiffres(A2)
 

Pièces jointes

Bonjour Job75 🙂
je me permet de revenir vers toi , j'ai établi une liste déroulante sans vide avec des données issues d'une même plage mais je n'arrive pas à faire de même avec des données issues de plages différentes.
Merci d'avance.
 

Pièces jointes

- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
5
Affichages
266
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…