IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Excel Discussion :

Extraire chiffres d'une cellule alphanumérique


Sujet :

Excel

  1. #1
    Membre du Club
    Profil pro
    Inscrit en
    juin 2012
    Messages
    200
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : juin 2012
    Messages : 200
    Points : 46
    Points
    46
    Par défaut Extraire chiffres d'une cellule alphanumérique
    Bonjour,

    Avez-vous une idee pour extraire les chiffres de cellulles comme ca :

    XXXXXX25
    XX12
    XXXXXXXXXXXXXX36
    XXXXXX0

    J'ai essaye avec la longueur des cellules et Droite et Gauche mais comme la longueur change d'une cellule a une autre je n'arrive pas a recuperer de facon "solide" les numeros.

    Merci pour votre aide

  2. #2
    Membre du Club
    Profil pro
    Inscrit en
    juin 2012
    Messages
    200
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : juin 2012
    Messages : 200
    Points : 46
    Points
    46
    Par défaut
    =SUMPRODUCT(MID(0&L2,LARGE(INDEX(ISNUMBER(--MID(L2,ROW($1:$25),1))* ROW($1:$25),0),ROW($1:$25))+1,1)*10^ROW($1:$25)/10)

    Fonctionne parfaitement

  3. #3
    Expert éminent sénior
    Homme Profil pro
    aucune
    Inscrit en
    septembre 2011
    Messages
    8 200
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : aucune

    Informations forums :
    Inscription : septembre 2011
    Messages : 8 200
    Points : 14 338
    Points
    14 338
    Par défaut
    Bonjour,

    C'est bien de poser une question et de poster la réponse 3 minutes plus tard. Le temps de composer le message ?
    quand au fonctionnement parfait... Telle quelle, la formule perd les zéros non significatifs.
    Cordialement.

    Daniel

    La plus perdue de toutes les journées est celle où l'on n'a pas ri. Chamfort

  4. #4
    Membre éprouvé Avatar de excfl
    Profil pro
    Inscrit en
    octobre 2012
    Messages
    690
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : octobre 2012
    Messages : 690
    Points : 1 250
    Points
    1 250
    Par défaut
    Bonjour le forum,
    Citation Envoyé par diego45 Voir le message
    J'ai essaye avec la longueur des cellules et Droite et Gauche mais comme la longueur change d'une cellule a une autre je n'arrive pas a recuperer de facon "solide" les numeros.
    Bravo pour la formule trouvée en 3 minutes.

    Peut-être ?
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    =DROITE(A1;NBCAR(SUBSTITUE(A1;"X";"")))
    Images attachées Images attachées  
    Si cette proposition vous convient, merci de cliquer sur :

  5. #5
    Membre actif
    Homme Profil pro
    Enthousiaste Excel
    Inscrit en
    avril 2015
    Messages
    155
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Hauts de Seine (Île de France)

    Informations professionnelles :
    Activité : Enthousiaste Excel

    Informations forums :
    Inscription : avril 2015
    Messages : 155
    Points : 242
    Points
    242
    Par défaut
    la solution doit-elle impérativement être sur Excel ?

    Tu as besoin d'une manipulation pour résoudre là le problème, ou bien d'une formule ?
    Un code VBA ferait l'affaire ?

    Tu veux, une manip, une formule ou un code ?

  6. #6
    Membre éprouvé Avatar de excfl
    Profil pro
    Inscrit en
    octobre 2012
    Messages
    690
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : octobre 2012
    Messages : 690
    Points : 1 250
    Points
    1 250
    Par défaut
    Si les "X" représentent tout caractère non numérique :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    =DROITE(A1;NBCAR(A1)-NBCAR(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(SUBSTITUE(A1;0;"");1;"");2;"");3;"");4;"");5;"");6;"");7;"");8;"");9;"")))
    Si cette proposition vous convient, merci de cliquer sur :

  7. #7
    Expert éminent

    Homme Profil pro
    Curieux
    Inscrit en
    juillet 2012
    Messages
    4 991
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Curieux
    Secteur : Arts - Culture

    Informations forums :
    Inscription : juillet 2012
    Messages : 4 991
    Points : 9 710
    Points
    9 710
    Billets dans le blog
    5
    Par défaut
    Bonjour,

    j'ai proposé ici : http://www.developpez.net/forums/d15...s/#post8239065

    une fonction personnalisée qui permet d'extraire les majuscules ou les minuscules (au choix)
    en tenant compte d'éventuels espaces entre plusieurs mot

    cette fonction est rapidement transposable pour effectuer le même traitement sur des valeurs numériques. elle sera deux fois plus courte que la fonction actuelle

    si tu es intéressé par une fonction perso ... Djohn92 aura peut être loisir de la modifier s'il le souhaite ?

    sinon, je m'en chargerai, en quelques minutes c'est réglé

  8. #8
    Membre chevronné
    Homme Profil pro
    Inscrit en
    septembre 2013
    Messages
    1 369
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations forums :
    Inscription : septembre 2013
    Messages : 1 369
    Points : 2 153
    Points
    2 153
    Par défaut
    Bonsoir,

    =STXT(A1;EQUIV(VRAI;ESTNUM(--(STXT(A1;LIGNE($1:$255);1)));0);99)
    valider avec maj+ctrl+entrée

    Jacques Boisgontier

  9. #9
    Membre actif
    Homme Profil pro
    Enthousiaste Excel
    Inscrit en
    avril 2015
    Messages
    155
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Hauts de Seine (Île de France)

    Informations professionnelles :
    Activité : Enthousiaste Excel

    Informations forums :
    Inscription : avril 2015
    Messages : 155
    Points : 242
    Points
    242
    Par défaut
    Brillant !

  10. #10
    Expert éminent sénior
    Homme Profil pro
    aucune
    Inscrit en
    septembre 2011
    Messages
    8 200
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : aucune

    Informations forums :
    Inscription : septembre 2011
    Messages : 8 200
    Points : 14 338
    Points
    14 338
    Par défaut
    Bonjour,

    Jacques, j'ai loupé quelque chose ? avec "a1aa2a3a4a5" en A1, "EQUIV" retourne "2" en utilisant F9. Et la formule retourne "1aa2a3a4a5".
    Cordialement.

    Daniel

    La plus perdue de toutes les journées est celle où l'on n'a pas ri. Chamfort

  11. #11
    Membre chevronné
    Homme Profil pro
    Inscrit en
    septembre 2013
    Messages
    1 369
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations forums :
    Inscription : septembre 2013
    Messages : 1 369
    Points : 2 153
    Points
    2 153
    Par défaut
    Bonjour,

    Pour la question posée, il faut extraire les chiffres de droite

    XXXXXX25
    XX12
    XXXXXXXXXXXXXX36
    XXXXXX0

    Pour extraire les chiffres de a1b2cc34dd3

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
     
    Function NumChaine(chaine)
      Application.Volatile
      TempChaine = Trim(Application.Substitute(chaine, ",", "."))
      Temp = ""
      For i = 1 To Len(TempChaine)
        c = Mid(TempChaine, i, 1)
        If c >= "0" And c <= "9" Or c = "." Then Temp = Temp & c
      Next i
      NumChaine = Val(Temp)
    End Function
    Jacques Boisgontier

  12. #12
    Expert éminent sénior
    Homme Profil pro
    aucune
    Inscrit en
    septembre 2011
    Messages
    8 200
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : aucune

    Informations forums :
    Inscription : septembre 2011
    Messages : 8 200
    Points : 14 338
    Points
    14 338
    Par défaut
    OK.
    Cordialement.

    Daniel

    La plus perdue de toutes les journées est celle où l'on n'a pas ri. Chamfort

  13. #13
    Candidat au Club
    Homme Profil pro
    Responsable des études
    Inscrit en
    janvier 2016
    Messages
    5
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 46
    Localisation : France, Rhône (Rhône Alpes)

    Informations professionnelles :
    Activité : Responsable des études
    Secteur : Bâtiment

    Informations forums :
    Inscription : janvier 2016
    Messages : 5
    Points : 4
    Points
    4
    Par défaut
    Citation Envoyé par boisgontierjacques Voir le message
    Bonsoir,

    =STXT(A1;EQUIV(VRAI;ESTNUM(--(STXT(A1;LIGNE($1:$255);1)));0);99)
    valider avec maj+ctrl+entrée

    Jacques Boisgontier
    Bonjour,

    Cela fonctionne très bien s'il n'y a pas de texte après le chiffre, sinon, le texte derrière apparaît tout de même.

    Par exemple :
    "Nombres de billes 200"
    "200" est bien extrait seul
    Par contre
    "Nombre de billes 200 restantes"
    Alors "200 restantes" apparaît

    Comment extraire le chiffre seul, en excluant le texte avant et après ?

    Merci par avance

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. extraire uniquement les chiffres d'une cellule
    Par delamarque dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 07/08/2017, 19h25
  2. [Toutes versions] extraire les chiffres d'une cellule
    Par Timi493 dans le forum Excel
    Réponses: 17
    Dernier message: 02/01/2014, 00h52
  3. Extraire seulement des chiffres dans une cellule
    Par helkøwsky dans le forum Excel
    Réponses: 2
    Dernier message: 12/11/2010, 18h59
  4. Réponses: 4
    Dernier message: 09/11/2006, 01h32
  5. [VBA-PP]fonction qui écrit un chiffre dans une cellule excel
    Par alpking dans le forum Macros et VBA Excel
    Réponses: 9
    Dernier message: 26/04/2006, 20h34

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo