extraction chiffre Fermé

Question

Bonjour, 

je souhaite extraire les 6 chiffres d'une cellule alphanumérique dans excel 2013. Les 6 chiffres sont à suivre dans la zone mais pas toujours au même endroit
Merci de votre aide

tontong · Accepted Answer

Bonjour,
Peut-être avec une matricielle de Jacques Boisgontier;
=STXT(A1;EQUIV(VRAI;ESTNUM(CNUM(STXT(A1;LIGNE($1:$255);1)));0);6)
-Valider avec Maj+Ctrl+Entrée

Mike-31 · Answer

Bonjour,

Tu peux donner quelques exemples de chaines que l'on voit ou peuvent se trouver tes chiffres s'il te plait

Maurice · Answer

Bonjour

sans modèle de ton fichier on voie pas grand chose

voila un exemple en vba

Sub TestNumeric()
   For L = 1 To Range("A" & Rows.Count).End(xlUp).Row
      T = Split(Range("A" & L).Value, " ")
      For I = LBound(T) To UBound(T)
         If IsNumeric(T(I)) Then
'            Debug.Print T(I)
            Range("A" & L).Value = T(I) * 1
         End If
      Next
   Next
End Sub


A+
Maurice

yclik · Answer

Bonjour
Une proposition à l'aide de colonnes intermédiaires
Extraction de la position des chiffres  contenus en A2 sur 10 colonnes (B2 à K2)
=SI(ESTERREUR(TROUVE(COLONNE()-2;$A2));"";TROUVE(COLONNE()-2;$A2))
à répéter de 0 à 9
extraction de la chaine de 6 caractère
=STXT(A2;MIN(B2:K2);6)

Mike-31 · Answer

Re,k

je te propose une fonction personnalisée en VBA si tu as quelques notions, ouvre le visual Basic et colle ce code
Function EXTNUM(Cellule As Range)    S = Cellule.Value    Application.Volatile    For i = 1 To Len(S)    If IsNumeric(Mid(S, i, 1)) Then    S = Mid(S, i)    Exit For    End If    Next    EXTNUM = Val(S)    End Function 

ensuite sur ta feuille de calcul appelle la fonction dans la cellule de ton choix.
si tu as besoin de plus de détail fait signe

Frenchie83 · Answer

Bonjour
Méthode simple
-Sélectionnez tous les textes de la colonne où doivent être extrait les nombres
-Sur le ruban, sélectionnez l'option "Données"
-Dans "Outils de Données" cliquez sur convertir (choisir "délimité" puis  "espace" comme séparateur)
dans la colonne à droite copiez cette formule
=SI(ESTNUM(B2);B2;SI(ESTNUM(C2);C2;D2)) et tirez vers le bas
Cdlt

Extraction chiffre

6 réponses

Discussions similaires