Remplacer texte par autre texte

Résolu
hr92 Messages postés 38 Statut Membre -  
hr92 Messages postés 38 Statut Membre -
Bonjour,

Je n'arrive pas à trouver la bonne formule pour remplacer un texte par un autre. Je m'explique, j'ai dans une cellule "24-Jean.Thomas:validé Bac" et j'aimerai transformée cette cellule par "24-Jean.Thomas:Bac", c'est à dire que dès lors que dans une cellule on a " xxxx Bac", on ait "Bac" directement.

Comment faire ?

Merci
A voir également:

6 réponses

Thorak83 Messages postés 1140 Statut Membre 156
 
Bonjour,

Faire un chercher/remplacer
Chercher "validé Bac" et remplacer par "Bac"

Bien sur ce sera manuel donc a faire a chaque fois

Cordialement
0
Vaucluse Messages postés 27336 Statut Contributeur 6 441
 
Bonjour
le remplacement peut se faire sur toute la feuille en une seule manip
si toutefois vous voulez une formule:
=SUBSTITUE(A1;"Validé bac";"bac")
crdlmnt
0
hr92 Messages postés 38 Statut Membre 2
 
@Vaucluse: la formule ne fonctionne pas
@Thorak83: C'est vrai que ca marche mais j'aimerai si possible le rendre automatisable car je serai amener à le faire tous les 2 semaines
merci
0
Vaucluse Messages postés 27336 Statut Contributeur 6 441
 
Ah?
probablement parce que votre texte dans la formule n'est pas conforme à celui de la cellule.
(Par exemple sensible à la casse ne fonctionne pas entre majuscule et minuscule)
voir ici:
https://www.cjoint.com/?CFvqzhszRAG

crdlmnt

Errare humanum est, perseverare diabolicum
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Vaucluse Messages postés 27336 Statut Contributeur 6 441
 
Autre option
(macro par enregistrement)

Sub Bac()

Sheets("Feuil1").Select
Cells.Select
Selection.Replace What:="validé Bac", Replacement:="Bac", LookAt:=xlPart _
, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Range("A1").Select
End Sub


Va remplacer dans toutes les cellules contenant validé Bac le texte par Bac
Il suffit de
Coller le texte dans un module VBA
placer le nom de la feuille entre guillemets dans la ligne Sheets("Feuil1").select
et de placer un bouton pour lancer la macro quand nécessaire

crdlmnt
0
hr92 Messages postés 38 Statut Membre 2
 
@Vaucluse Autantpour moi !! Effectivement la formule fonctionne très bien. Merci beaucoup !
0