oui, à condition de savoir lequel ou est-il l'unique ?
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"FLORENCE" a écrit dans le message de news:158a201c41b22$f601d610$
BONJOUR EST-IL POSSIBLE DE SUPPRIMER UN ESPACE DANS UN ENREGISTREMENT ET SI OUI PAR QUEL METHODE.
MERCI D'AVANCE POUR VOTRE AIDE
Florence
En bref j'ai une base article de 70000 Références. dans ces réf. composés de 3 lettres d'un espace et d'une suite de longueur non fixe. Je suite supprimer l'espace entre les 3 lettres et la suite.
-----Message d'origine----- oui, à condition de savoir lequel ou est-il l'unique ?
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"FLORENCE" a écrit dans le message de
news:158a201c41b22$f601d610$
BONJOUR EST-IL POSSIBLE DE SUPPRIMER UN ESPACE DANS UN ENREGISTREMENT ET SI OUI PAR QUEL METHODE.
MERCI D'AVANCE POUR VOTRE AIDE
.
En bref j'ai une base article de 70000 Références. dans
ces réf. composés de 3 lettres d'un espace et d'une suite
de longueur non fixe. Je suite supprimer l'espace entre
les 3 lettres et la suite.
-----Message d'origine-----
oui, à condition de savoir lequel ou est-il l'unique ?
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"FLORENCE" <anonymous@discussions.microsoft.com> a écrit
dans le message de
news:158a201c41b22$f601d610$a601280a@phx.gbl...
BONJOUR
EST-IL POSSIBLE DE SUPPRIMER UN ESPACE DANS UN
ENREGISTREMENT ET SI OUI PAR QUEL METHODE.
En bref j'ai une base article de 70000 Références. dans ces réf. composés de 3 lettres d'un espace et d'une suite de longueur non fixe. Je suite supprimer l'espace entre les 3 lettres et la suite.
-----Message d'origine----- oui, à condition de savoir lequel ou est-il l'unique ?
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"FLORENCE" a écrit dans le message de
news:158a201c41b22$f601d610$
BONJOUR EST-IL POSSIBLE DE SUPPRIMER UN ESPACE DANS UN ENREGISTREMENT ET SI OUI PAR QUEL METHODE.
MERCI D'AVANCE POUR VOTRE AIDE
.
Raymond [mvp]
Dans cas tu fais une requête mise à jour:
si tu es en version 2000: UPDATE table1 SET table1.Numéro = Replace([numéro]," ","");
en version antérieure il faut ajouter une fonction personelle replace dans un module standard: Public Function Replace(Chaine, AncienTexte, NouveauTexte) As String Dim StringTmp As String, Pointer As Integer If IsNull(Chaine) Then Replace = False Else StringTmp = Chaine Pointer = InStr(1, StringTmp, AncienTexte) Do While Pointer > 0 StringTmp = Left(StringTmp, Pointer - 1) & NouveauTexte & _ Mid(StringTmp, Pointer + Len(AncienTexte)) Pointer = InStr(Pointer + Len(NouveauTexte), StringTmp, AncienTexte) Loop Replace = StringTmp End If End Function
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Florence" a écrit dans le message de news:1877201c41b25$73e23140$ En bref j'ai une base article de 70000 Références. dans ces réf. composés de 3 lettres d'un espace et d'une suite de longueur non fixe. Je suite supprimer l'espace entre les 3 lettres et la suite.
Dans cas tu fais une requête mise à jour:
si tu es en version 2000:
UPDATE table1 SET table1.Numéro = Replace([numéro]," ","");
en version antérieure il faut ajouter une fonction personelle replace dans
un module standard:
Public Function Replace(Chaine, AncienTexte, NouveauTexte) As String
Dim StringTmp As String, Pointer As Integer
If IsNull(Chaine) Then
Replace = False
Else
StringTmp = Chaine
Pointer = InStr(1, StringTmp, AncienTexte)
Do While Pointer > 0
StringTmp = Left(StringTmp, Pointer - 1) & NouveauTexte & _
Mid(StringTmp, Pointer + Len(AncienTexte))
Pointer = InStr(Pointer + Len(NouveauTexte), StringTmp,
AncienTexte)
Loop
Replace = StringTmp
End If
End Function
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"Florence" <anonymous@discussions.microsoft.com> a écrit dans le message de
news:1877201c41b25$73e23140$a401280a@phx.gbl...
En bref j'ai une base article de 70000 Références. dans
ces réf. composés de 3 lettres d'un espace et d'une suite
de longueur non fixe. Je suite supprimer l'espace entre
les 3 lettres et la suite.
si tu es en version 2000: UPDATE table1 SET table1.Numéro = Replace([numéro]," ","");
en version antérieure il faut ajouter une fonction personelle replace dans un module standard: Public Function Replace(Chaine, AncienTexte, NouveauTexte) As String Dim StringTmp As String, Pointer As Integer If IsNull(Chaine) Then Replace = False Else StringTmp = Chaine Pointer = InStr(1, StringTmp, AncienTexte) Do While Pointer > 0 StringTmp = Left(StringTmp, Pointer - 1) & NouveauTexte & _ Mid(StringTmp, Pointer + Len(AncienTexte)) Pointer = InStr(Pointer + Len(NouveauTexte), StringTmp, AncienTexte) Loop Replace = StringTmp End If End Function
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Florence" a écrit dans le message de news:1877201c41b25$73e23140$ En bref j'ai une base article de 70000 Références. dans ces réf. composés de 3 lettres d'un espace et d'une suite de longueur non fixe. Je suite supprimer l'espace entre les 3 lettres et la suite.
FLORENC
Merci pour tes précieux renseignements je vais essayer ça tous de suite.
Florence
-----Message d'origine----- Dans cas tu fais une requête mise à jour:
si tu es en version 2000: UPDATE table1 SET table1.Numéro = Replace ([numéro]," ","");
en version antérieure il faut ajouter une fonction personelle replace dans
un module standard: Public Function Replace(Chaine, AncienTexte, NouveauTexte) As String
Dim StringTmp As String, Pointer As Integer If IsNull(Chaine) Then Replace = False Else StringTmp = Chaine Pointer = InStr(1, StringTmp, AncienTexte) Do While Pointer > 0 StringTmp = Left(StringTmp, Pointer - 1) & NouveauTexte & _
AncienTexte) Loop Replace = StringTmp End If End Function
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Florence" a écrit dans le message de
news:1877201c41b25$73e23140$ En bref j'ai une base article de 70000 Références. dans ces réf. composés de 3 lettres d'un espace et d'une suite de longueur non fixe. Je suite supprimer l'espace entre les 3 lettres et la suite.
.
Merci pour tes précieux renseignements je vais essayer ça
tous de suite.
Florence
-----Message d'origine-----
Dans cas tu fais une requête mise à jour:
si tu es en version 2000:
UPDATE table1 SET table1.Numéro = Replace
([numéro]," ","");
en version antérieure il faut ajouter une fonction
personelle replace dans
un module standard:
Public Function Replace(Chaine, AncienTexte,
NouveauTexte) As String
Dim StringTmp As String, Pointer As Integer
If IsNull(Chaine) Then
Replace = False
Else
StringTmp = Chaine
Pointer = InStr(1, StringTmp, AncienTexte)
Do While Pointer > 0
StringTmp = Left(StringTmp, Pointer - 1) &
NouveauTexte & _
AncienTexte)
Loop
Replace = StringTmp
End If
End Function
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"Florence" <anonymous@discussions.microsoft.com> a écrit
dans le message de
news:1877201c41b25$73e23140$a401280a@phx.gbl...
En bref j'ai une base article de 70000 Références. dans
ces réf. composés de 3 lettres d'un espace et d'une suite
de longueur non fixe. Je suite supprimer l'espace entre
les 3 lettres et la suite.
AncienTexte) Loop Replace = StringTmp End If End Function
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Florence" a écrit dans le message de
news:1877201c41b25$73e23140$ En bref j'ai une base article de 70000 Références. dans ces réf. composés de 3 lettres d'un espace et d'une suite de longueur non fixe. Je suite supprimer l'espace entre les 3 lettres et la suite.
