Comment extraire un chiffre dans une cellule
Résolu/Fermé
A voir également:
- Comment extraire un chiffre dans une cellule
- Extraire une video youtube - Guide
- Aller à la ligne dans une cellule excel - Guide
- Extraire son video - Guide
- Application pour écrire les chiffre en lettre - Télécharger - Outils professionnels
- Verrouiller cellule excel - Guide
3 réponses
Vaucluse
Messages postés
26496
Date d'inscription
lundi 23 juillet 2007
Statut
Contributeur
Dernière intervention
1 avril 2022
6 394
3 sept. 2014 à 16:10
3 sept. 2014 à 16:10
Bonjour
si vous n'avez vraiment que ces deux configurations, c'est à dire:
__soit le texte commence par les deux chiffres
__soit le chiffre dans let texte est précédé par underscore
cette formule devrait faire l'affaire
=SI(ESTERREUR(GAUCHE(A2;1)*1);STXT(A2;TROUVE("_";A2;1)+1;2)*1;GAUCHE(A2;2)*1)
crdlmnt
si vous n'avez vraiment que ces deux configurations, c'est à dire:
__soit le texte commence par les deux chiffres
__soit le chiffre dans let texte est précédé par underscore
cette formule devrait faire l'affaire
=SI(ESTERREUR(GAUCHE(A2;1)*1);STXT(A2;TROUVE("_";A2;1)+1;2)*1;GAUCHE(A2;2)*1)
crdlmnt
via55
Messages postés
14402
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
18 avril 2024
2 702
3 sept. 2014 à 16:21
3 sept. 2014 à 16:21
Bonjour
Possible avec une fonction personnalisée
ALT F11 pour ouvrir l'éditeur VBA
Onglet Insertion Module
Copier et coller cette fonction :
Function chiffres(chaine)
chif = ""
For n = 1 To Len(chaine)
c = Mid(chaine, n, 1)
If c >= "0" And c <= "9" And Len(chif) < 2 Then chif = chif & c
Next
chiffres = Val(chif)
End Function
Fermer l'éditeur
S'utilise après comme n'importe quelle fonction
= chiffres (A1) renverra 40
Cdlmnt
Possible avec une fonction personnalisée
ALT F11 pour ouvrir l'éditeur VBA
Onglet Insertion Module
Copier et coller cette fonction :
Function chiffres(chaine)
chif = ""
For n = 1 To Len(chaine)
c = Mid(chaine, n, 1)
If c >= "0" And c <= "9" And Len(chif) < 2 Then chif = chif & c
Next
chiffres = Val(chif)
End Function
Fermer l'éditeur
S'utilise après comme n'importe quelle fonction
= chiffres (A1) renverra 40
Cdlmnt
Salut,
J'ai finalement trouvé la solution:
GAUCHE(C1;CHERCHE("Mb";C1)+1)
Merci
J'ai finalement trouvé la solution:
GAUCHE(C1;CHERCHE("Mb";C1)+1)
Merci
via55
Messages postés
14402
Date d'inscription
mercredi 16 janvier 2013
Statut
Membre
Dernière intervention
18 avril 2024
2 702
3 sept. 2014 à 16:37
3 sept. 2014 à 16:37
Rien à voir avec la demande de départ où il n'était pas question de Mb !!!
