Extraire un nombre entier d'une chaîne

[Magic_Doctor]

Bonjour,

J'ai une fonction (supposons : MaFonction(d1 As Date, d2 As Date) As String) qui me renvoie une chaîne, qui peut être, par exemple :
7 ans / 4 mois / 30 jours
ou : 6 mois / 2 jours
ou : 22 jours
ou : ... bref, toutes les combinaisons sont bonnes.

Je voudrais récupérer uniquement le nombre d'années de cette chaîne, s'il y en a. Dans le cas contraire, le résultat serait 0.

Merci pour tout conseil.

 

[pierrejean]

Re : Extraire un nombre entier d'une chaîne

Bonjour Magic_Doctor

Un essai

 

[david84]

Re : Extraire un nombre entier d'une chaîne

Bonjour,
si le nombre d'années est toujours indiqué en première position comme dans ton exemple :
- contrôler si le terme " an" est présent dans la chaine avec Instr
- utiliser la fonction Val pour ramener le nombre d'années.
A+

Edit : bonjour pierrejean

 

[job75]

Re : Extraire un nombre entier d'une chaîne

Bonjour Magic_Doctor, salut Pierre, salut David,

Une petite formule bien classique :

=SI(ESTNUM(CHERCHE("an";A1));--GAUCHE(A1;CHERCHE("an";A1)-1);0)

Ou sur Excel 2007/2013 :

=SIERREUR(--GAUCHE(A1;CHERCHE("an";A1)-1);0)

Edit : fichier joint pour voir la formule sur ta version en espagnol.

A+

 

[job75]

Re : Extraire un nombre entier d'une chaîne

Re,

Si l'on veut aussi extraire les mois et les jours :

=SI(ESTNUM(CHERCHE("mois";A2));--STXT(0&A2;CHERCHE("mois";0&A2)-3;3);0)

=SI(ESTNUM(CHERCHE("jour";A2));--STXT(0&A2;CHERCHE("jour";0&A2)-3;3);0)

Fichier (2).

A+

 

[Magic_Doctor]

Re : Extraire un nombre entier d'une chaîne

Bonsoir pierrejean, david, job,

Merci pour vos réponses. Ça marche impec. Pour des raisons techniques (le résultat étant traité lors du déroulement d'une macro évènementielle afin de comparer 2 valeurs), j'ai retenu la solution de pierrejean.

Bonne soirée à tous.