Discussion :

[TheFlow]

Bonjour à tous !

A supposer que j'ai dans une feuille Excel des titres de chansons accompagnés de leurs artistes respectifs. Les titres sont enregistrés avec des intitulés différents. ex : Macoumba, Macoumba DJ Moule Remix, Macoumba Radio Edit....

Je souhaite exclure des titres ces variations de suffixes afin de facilité leur comptabilisation. Est-il possible d'y parvenir avec une fonction "rechercher/remplacer" particulière ?
Autre exemple :
-chercher tous les titres commençant par "Macumba"
-supprimer tout ce qui se trouve après les caractères "Macumba"

Sachant faire une loop pour appliquer ces modifications à toute la page, je cherche donc la clé qui me permettra de faire cette modif automatiquement.

Merci à vous, vous qui n'avez peut-être pas pu vous empêcher de fredonner l'air de ce petit joyau de notre terroir français.

[Tdeny]

Bonjour,

Je ne vois pas comment faire ça automatiquement.
Mais..., tu peux toujours entrer la formule ci-dessous adaptée à coté de tes noms.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

=SI(ESTERR(STXT(D1;1;TROUVE(",";D1;1)-1));D1;STXT(D1;1;TROUVE(",";D1;1)-1))

C'est à dire qu'il cherche la virgule par trouve et sort tout ce qu'il y a avant elle. Mais il y a erreur si il n'y en a pas, d'où le si(esterr...) qui renvoie si erreur la cellule entière, ici D1.

Il est évident qu'il faut ensuite faire un Copier des cellules obtenues et un collage spécial valeurs dans celles d'origine.

[Gorfael]

Salut TheFlow

Sachant faire une loop pour appliquer ces modifications à toute la page, je cherche donc la clé qui me permettra de faire cette modif automatiquement.

Je suppose que tu veux du code VBA ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
dim Cel as range
dim Plg as range
Set Plg = range("A1:B50")
for each cel in plg
     if cel like "macumba*" then cel="macumba"
next cel

code fait de tête pour remplacer tout titre de la plage A1:B50 qui commence par "macumba" par "macumba"
Tu peux aussi utiliser lcase(left(cel,7))="macumba"

vous qui n'avez peut-être pas pu vous empêcher de fredonner l'air de ce petit joyau de notre terroir français.

avec un pseudo comme le tien ???
A+

[TheFlow]

Merci de vos réponses. En fait, j'ai automatiser la fonction "convertir" du tableur. Celle ci déplace dans une nouvelle colonne tous les caractères qui en précèdent un bien défini (ex : après un "-" ou une "(").

Combiné à la fonction "supprespace", j'ai pu parvenir à mes fins