Autres ignoré un chiffre entre parenthèse

hades76000

XLDnaute Nouveau
bonjour

voici ma recherche je voudrais que la formule excel ignore un chiffre entre parenthèse

exemple musique d'un cheval
0a(22)0a0a0a0a0a
je demande à excel d'épurer la musique voici le résultat
0(22)00000
je voudrais excel ignore (22) en recopiant la musique épurée qu'il affiche que des zéros
ma formule
=SI(A2<>"";musEpuree(D2);"")

autres exemple
musique du cheval
0a2a(22)Da4a1a3a4a4a
musique épurée
02(22)041344

merci de vos réponses

didier
 

Gégé-45550

XLDnaute Accro
bonjour

voici ma recherche je voudrais que la formule excel ignore un chiffre entre parenthèse

exemple musique d'un cheval
0a(22)0a0a0a0a0a
je demande à excel d'épurer la musique voici le résultat
0(22)00000
je voudrais excel ignore (22) en recopiant la musique épurée qu'il affiche que des zéros
ma formule
=SI(A2<>"";musEpuree(D2);"")

autres exemple
musique du cheval
0a2a(22)Da4a1a3a4a4a
musique épurée
02(22)041344

merci de vos réponses

didier
Bonjour,
Une proposition :
VB:
=SI(SIERREUR(TROUVE("(";A2);0)=0;A2;GAUCHE(A2;SIERREUR(TROUVE("(";A2);0)-1) & DROITE(A2;NBCAR(A2)-SIERREUR(TROUVE(")";A2);0)))
Cordialement,
 
Dernière édition:

Gégé-45550

XLDnaute Accro
Bonjour à tous
En D2
Code:
=SIERREUR(SUBSTITUE(A2;STXT(A2;CHERCHE("(";A2);CHERCHE(")";A2)-CHERCHE("(";A2)+1);"");"")
Bonjour Jacky67,
Ta formule est parfaite ... sauf qu'elle ne gère pas le cas où la source ne comporte pas de parenthèses ... mais peut-être que ce cas ne se présente jamais ; seul hades76000 le sait.
Cela dit, il peut être aussi nécessaire de gérer les cas où la cellule contient seulement une parenthèse ouvrante ou seulement une parenthèse fermante.
Bien amicalement,
 

job75

XLDnaute Barbatruc
Bonsoir,

Avec REMPLACER :
Code:
=REMPLACER(A2;TROUVE("(";A2);TROUVE(")";A2)-TROUVE("(";A2)+1;"")
On peut ne pas mettre les guillemets "" à la fin.

Bonne nuit.

Edit : on peut ajouter SIERREUR :
Code:
=SIERREUR(REMPLACER(A2;TROUVE("(";A2);TROUVE(")";A2)-TROUVE("(";A2)+1;);""&A2)
 
Dernière édition:

job75

XLDnaute Barbatruc
Bonjour hades76000, le forum,

S'il y a plusieurs groupes de parenthèses on peut utiliser cette fonction VBA :
VB:
Function SansParentheses$(x$)
Dim i%, sup As Boolean
For i = 1 To Len(x)
    If Mid(x, i, 1) = "(" Then sup = True
    If i > 1 Then If Mid(x, i - 1, 1) = ")" Then sup = False
    If Not sup Then SansParentheses = SansParentheses & Mid(x, i, 1)
Next
End Function
A+
 

Pièces jointes

  • Sans parenthèses(1).xlsm
    16.1 KB · Affichages: 9

Statistiques des forums

Discussions
315 093
Messages
2 116 139
Membres
112 669
dernier inscrit
Guigui2502