Comment retirer tout un texte entre parenthèse?Résolu

Question

Bonjour,

Pour faire un matching dans une liste, je dois pouvoir faire des modifications d'un texte qui se trouve entre parenthèse.

exemple:Pomme doit matcher avec Pomme (123) ou Pomme (rouge) ou Pomme.

Comment dès lors dans une macro VBA-Excel faire en sorte que le texte entre parenthèse soit systématiquement retiré (sachant que ce qui est à l'intérieur des parenthèse est variable: texte ou nombre, longueur variable)?

Merci d'avance pour toute aide.
Tumper

cs_Exploreur · Accepted Answer

Salut,

Est-ce cela que tu souhaites ?

Private Sub Command1_Click()


Dim sChaine As String
Dim sString As String
Dim iLocateFirst As Integer
Dim iLocateSecond As Integer
Dim iDiff As Integer


sChaine = "Pomme (123456789)"


iLocateFirst = InStr(1, sChaine, "(")
iLocateSecond = InStr(iLocateFirst, sChaine, ")")
sDiff = iLocateSecond - iLocateFirst
sString = Mid$(sChaine, iLocateFirst + 1, sDiff - 1)


MsgBox sString


End Sub


A+
Exploreur

 Linux a un noyau, Windows un pépin

alias666 · Answer

Bonjour, as-tu testé la fonction REPLACE ? Par exemple monchamp = Replace(monchamp, "(","") et de même pour l'autre parenthèse ? _______________________ <<<< :-: 4L!@$ :-: >>>>

tumper · Answer

Ce n'est pas ça que je veux faire. Je veux retirer les parenthèses tout ce qui se trouve à l'intérieur.
Je suis en train d'essayer avec ceci:

Cells.Replace What:=" (*)", Replacement:=""

alias666 · Answer

Si le nombre de caractère est fixe (si c'est tout le temps pomme par exemple) tu peux utiliser la fonction Left qui rte sert à garder un bout de ta chaine, pour pomme par exemple monchamp = Left(monchamp,5) Sinon tu seras obligé d'isoler ta chaine. _______________________ <<<< :-: 4L!@$ :-: >>>>

tumper · Answer

Oui le problème est que ça peut être "Pomme" ou "Poire" donc je ne peux pas utiliser Left. Mais la fonction que j'ai mentionné ci-dessus (Replace "(*)") semble marcher correctement même si ce n'est pas le plus "propre" des codes...

Merci pour l'aide.

jrivet · Answer

Salut,
Sinon si c'est pour une recherche, Utilise Instr
ce qui fera que Pomme sera trouver dans Pomme (123) et dans Pomme(rouge)

@+: Ju£i?n
Pensez: Réponse acceptée

jrivet · Answer

Re,
Oh lalal mais que est ce que je suis lent ce matin...

@+: Ju£i?n
Pensez: Réponse acceptée

cs_Exploreur · Answer

Comme dit mon fils : Ratatatata....lol..., salut Jrivet

A+
Exploreur

 Linux a un noyau, Windows un pépin

tumper · Answer

Merci Explorer, nickel !

cs_Exploreur · Answer

Re,

Tumper >> Si les réponses obtenues à ta demande on résolut ton problème, pense à valider celles-ci... 

A+
Exploreur

 Linux a un noyau, Windows un pépin

Comment retirer tout un texte entre parenthèse?

10 réponses

Votre réponse

Discussions similaires