OVH Cloud OVH Cloud

Remplacer une chaîne de caractères

6 réponses
Avatar
atmus
Bonsoir,

Comment dans une cha=EEne de caract=E8re remplacer le=20
mot "ABC" par le chiffre 15

Exemple:

"Le sigle ABC est ...." =3D=3D> "Le sigle 15 est ...."
"ABC ne fonctionne pas" =3D=3D> "15 ne fonctionne pas"


Merci

6 réponses

Avatar
Raymond
Bonsoir.

Replace("ABC ne fonctionne pas", "ABC", "15") donnera
15 ne fonctionne pas
Replace("""ABC ne fonctionne pas""", "ABC", "15") donnera
"15 ne fonctionne pas"

--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"atmus" a écrit dans le message de
news:080201c34c85$2edf66e0$
Bonsoir,

Comment dans une chaîne de caractère remplacer le
mot "ABC" par le chiffre 15

Exemple:

"Le sigle ABC est ...." ==> "Le sigle 15 est ...."
"ABC ne fonctionne pas" ==> "15 ne fonctionne pas"


Merci
Avatar
atmus
Salut Raymond,

J'ai tutilisé la fonction replace() dans une requête, mais
m'affiche le message suivant: "Fonction Replace non
définie dans l'expression"

Voilà ce que j'ai mi dans le générateur d'expression:
Expr3: Replace([COLONNE01];"ABC";"15")


alors, où est le problème?
J'utilise Access 2000 sous Win98

Merci


-----Message d'origine-----
Bonsoir.

Replace("ABC ne fonctionne pas", "ABC", "15") donnera
15 ne fonctionne pas
Replace("""ABC ne fonctionne pas""", "ABC", "15") donnera
"15 ne fonctionne pas"

--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"atmus" a écrit dans le message de
news:080201c34c85$2edf66e0$
Bonsoir,

Comment dans une chaîne de caractère remplacer le
mot "ABC" par le chiffre 15

Exemple:

"Le sigle ABC est ...." ==> "Le sigle 15 est ...."
"ABC ne fonctionne pas" ==> "15 ne fonctionne pas"


Merci

.



Avatar
3stone
Salut,

atmus
J'ai tutilisé la fonction replace() dans une requête, mais
m'affiche le message suivant: "Fonction Replace non
définie dans l'expression"

Voilà ce que j'ai mi dans le générateur d'expression:
Expr3: Replace([COLONNE01];"ABC";"15")



Colle cette fonction dans une module...
Avatar
Raymond
je viens de tester ça fonctionne très bien.

as-tu placé la fonction dans un module normal standard, pas dans un
formulaire pas dans un état pas dans un module de classe ?
qu'est-ce qui ne fonctionne pas ? message ?

--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"atmus" a écrit dans le message de
news:005901c34c8e$6dfcfff0$
Salut 3stone,
J'ai fait ce que tu m'as demendé
Mais, la fonction ne marche pas. ça bogue!!

Alors

A+
Avatar
André AVONS
Salut
Tu dois etre sous 97 donc il te faut la fonction
Copies ce qui suit dans nouveau module
Function Replace(ByVal Valuein As String, ByVal WhatToReplace As _

String, ByVal Replacevalue As String) As String

Dim Temp as String, P As Long

Temp = Valuein

P = Instr(Temp, WhatToReplace)

Do While P > 0

Temp=Left(Temp, P-1) & Replacevalue & _

Mid(Temp, P+Len(WhatToReplace))

P = InStr(P + Len(Replacevalue), Temp, WhatToReplace, 1)

Loop

Replace = Temp

End Function


--
@+
André

Quelques liens avec des exemples, des utilitaires et des compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
"Raymond" a écrit dans le message de
news:
je viens de tester ça fonctionne très bien.

as-tu placé la fonction dans un module normal standard, pas dans un
formulaire pas dans un état pas dans un module de classe ?
qu'est-ce qui ne fonctionne pas ? message ?

--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"atmus" a écrit dans le message de
news:005901c34c8e$6dfcfff0$
Salut 3stone,
J'ai fait ce que tu m'as demendé
Mais, la fonction ne marche pas. ça bogue!!

Alors

A+



Avatar
3stone
Salut,

André AVONS
Tu dois etre sous 97 donc il te faut la fonction
Copies ce qui suit dans nouveau module



Il avait bien dit :

================================== alors, où est le problème?
J'utilise Access 2000 sous Win98
==================================
me semble-t-il...

--
A+
Pierre (3stone) Access MVP
--------------------------------------
Une pour tous, tous pour une ;-)
http://users.skynet.be/mpfa/
--------------------------------------