Remplacer texte par autre texte

Résolu/Fermé
hr92 Messages postés 36 Date d'inscription jeudi 13 juin 2013 Statut Membre Dernière intervention 13 août 2013 - 21 juin 2013 à 15:17
hr92 Messages postés 36 Date d'inscription jeudi 13 juin 2013 Statut Membre Dernière intervention 13 août 2013 - 21 juin 2013 à 16:55
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

6 réponses

Thorak83 Messages postés 1051 Date d'inscription jeudi 20 juin 2013 Statut Membre Dernière intervention 22 décembre 2017 156
21 juin 2013 à 15:31
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 26496 Date d'inscription lundi 23 juillet 2007 Statut Contributeur Dernière intervention 1 avril 2022 6 413
21 juin 2013 à 15:50
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 36 Date d'inscription jeudi 13 juin 2013 Statut Membre Dernière intervention 13 août 2013 2
21 juin 2013 à 16:16
@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 26496 Date d'inscription lundi 23 juillet 2007 Statut Contributeur Dernière intervention 1 avril 2022 6 413
Modifié par Vaucluse le 21/06/2013 à 16:27
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 26496 Date d'inscription lundi 23 juillet 2007 Statut Contributeur Dernière intervention 1 avril 2022 6 413
21 juin 2013 à 16:33
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 36 Date d'inscription jeudi 13 juin 2013 Statut Membre Dernière intervention 13 août 2013 2
21 juin 2013 à 16:55
@Vaucluse Autantpour moi !! Effectivement la formule fonctionne très bien. Merci beaucoup !
0