OVH Cloud OVH Cloud

Conversion

11 réponses
Avatar
Eddan
Bonjour,

Comment faire pour convertir le texte d'un champ en chiffres.

J'ai deux champs, T_1 (txt) et T_2 (txt), je souhaiterais que lors de la MJ
de T_1 la coversion se fasse en chiffres dans le T_2.

Grand merci

10 réponses

1 2
Avatar
Raymond [mvp]
Bonjour.

d'habitude on fait le contraire.
tu as un texte par exemple qutre-vingt-dix-huit à convertir en 98 ?

--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Eddan" a écrit dans le message de news:

Bonjour,

Comment faire pour convertir le texte d'un champ en chiffres.

J'ai deux champs, T_1 (txt) et T_2 (txt), je souhaiterais que lors de la
MJ
de T_1 la coversion se fasse en chiffres dans le T_2.

Grand merci


Avatar
Ayrton [ASC]
Bonjour *Eddan*
Dans ton message de news:,
Tu as pensé très fort :-(*)

Bonjour,

Comment faire pour convertir le texte d'un champ en chiffres.

J'ai deux champs, T_1 (txt) et T_2 (txt), je souhaiterais que lors de
la MJ de T_1 la coversion se fasse en chiffres dans le T_2.


Peut être ici si j'ai bien compris la question....
http://users.skynet.be/accesshome/accesshome_string_nombreenlettres.htm

Grand merci


Avec Plaisir ;-)

--
@+
Ayrton
http://cerbermail.com/?ljOK1CRTMt
Recherche dans les Archives :
http://groups.google.fr/group/microsoft.public.fr.windowsxp?hl=fr
Charte NG :
http://support.microsoft.com/directory/worldwide/fr/newsgroup/regles.htm

Avatar
Eddan
Exemple : Delamontagne Jean-Michel

@ +



Bonjour.

d'habitude on fait le contraire.
tu as un texte par exemple qutre-vingt-dix-huit à convertir en 98 ?

--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Eddan" a écrit dans le message de news:

Bonjour,

Comment faire pour convertir le texte d'un champ en chiffres.

J'ai deux champs, T_1 (txt) et T_2 (txt), je souhaiterais que lors de la
MJ
de T_1 la coversion se fasse en chiffres dans le T_2.

Grand merci







Avatar
Hervé DUCARNE
Bonjour,

Euh, et Delamontagne Jean-Michel ça donne quoi en chiffres ????

@+


"Eddan" a écrit dans le message de
news:

Exemple : Delamontagne Jean-Michel

@ +



Bonjour.

d'habitude on fait le contraire.
tu as un texte par exemple qutre-vingt-dix-huit à convertir en 98 ?

--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Eddan" a écrit dans le message de
news:



Bonjour,

Comment faire pour convertir le texte d'un champ en chiffres.

J'ai deux champs, T_1 (txt) et T_2 (txt), je souhaiterais que lors de
la



MJ
de T_1 la coversion se fasse en chiffres dans le T_2.

Grand merci









Avatar
Eric
Bonjour,
Avec la même interrogation qu'Hervé mais sait-on jamais !

Avec ceci peut-être :

Function zz()
Dim chaine As String, nb As Integer
Dim i As Byte, total As Integer
'on admet pour le fun que la longueur de la chaine
' n'excède pas 255 caractères !
chaine = "Delamontagne Jean-Michel"
For i = 1 To Len(chaine)
total = total + Asc(Mid(chaine, i, 1))
Next i
MsgBox chaine & " en numérique c'est : " _
& Format(total, " # ##0,00")
End Function


Exemple : Delamontagne Jean-Michel

@ +




Bonjour.

d'habitude on fait le contraire.
tu as un texte par exemple qutre-vingt-dix-huit à convertir en 98 ?

--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Eddan" a écrit dans le message de news:


Bonjour,

Comment faire pour convertir le texte d'un champ en chiffres.

J'ai deux champs, T_1 (txt) et T_2 (txt), je souhaiterais que lors de la
MJ
de T_1 la coversion se fasse en chiffres dans le T_2.

Grand merci







--
A+
Eric
http://users.skynet.be/mpfa/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr



Avatar
3stone
Salut,

| Eric"
| Avec la même interrogation qu'Hervé mais sait-on jamais !
|
| Avec ceci peut-être :
|
| Function zz()
| Dim chaine As String, nb As Integer
| Dim i As Byte, total As Integer
| 'on admet pour le fun que la longueur de la chaine
| ' n'excède pas 255 caractères !
| chaine = "Delamontagne Jean-Michel"
| For i = 1 To Len(chaine)
| total = total + Asc(Mid(chaine, i, 1))
| Next i
| MsgBox chaine & " en numérique c'est : " _
| & Format(total, " # ##0,00")
| End Function



Dans ce cas, je tente plus simple...


=Len("Delamontagne Jean-Michel")


Why not ?

;-))

--
A+
Pierre (3stone) Access MVP
Perso: http://users.skynet.be/accesshome/
Conseils MPFA: http://users.skynet.be/mpfa/
Avatar
Eddan
Bonjour,

Merci pour la réponse.

Je me suis peut être mal expliqué. Ce que je cherche, c'est à obtenir le
code caractère de chaque une des letres qui composent mon texte.

Est-ce possible ?




Bonjour,
Avec la même interrogation qu'Hervé mais sait-on jamais !

Avec ceci peut-être :

Function zz()
Dim chaine As String, nb As Integer
Dim i As Byte, total As Integer
'on admet pour le fun que la longueur de la chaine
' n'excède pas 255 caractères !
chaine = "Delamontagne Jean-Michel"
For i = 1 To Len(chaine)
total = total + Asc(Mid(chaine, i, 1))
Next i
MsgBox chaine & " en numérique c'est : " _
& Format(total, " # ##0,00")
End Function


Exemple : Delamontagne Jean-Michel

@ +




Bonjour.

d'habitude on fait le contraire.
tu as un texte par exemple qutre-vingt-dix-huit à convertir en 98 ?

--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"Eddan" a écrit dans le message de news:


Bonjour,

Comment faire pour convertir le texte d'un champ en chiffres.

J'ai deux champs, T_1 (txt) et T_2 (txt), je souhaiterais que lors de la
MJ
de T_1 la coversion se fasse en chiffres dans le T_2.

Grand merci







--
A+
Eric
http://users.skynet.be/mpfa/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr






Avatar
Eddan
Salut et merci de ta réponse.

Peux-tu voir stp la question que j'ai posé é Eric.

Salut



Salut,

| Eric"
| Avec la même interrogation qu'Hervé mais sait-on jamais !
|
| Avec ceci peut-être :
|
| Function zz()
| Dim chaine As String, nb As Integer
| Dim i As Byte, total As Integer
| 'on admet pour le fun que la longueur de la chaine
| ' n'excède pas 255 caractères !
| chaine = "Delamontagne Jean-Michel"
| For i = 1 To Len(chaine)
| total = total + Asc(Mid(chaine, i, 1))
| Next i
| MsgBox chaine & " en numérique c'est : " _
| & Format(total, " # ##0,00")
| End Function



Dans ce cas, je tente plus simple...


=Len("Delamontagne Jean-Michel")


Why not ?

;-))

--
A+
Pierre (3stone) Access MVP
Perso: http://users.skynet.be/accesshome/
Conseils MPFA: http://users.skynet.be/mpfa/




Avatar
Eric
Bonsoir,

La fonction ASC() te retourne le code Ascii d'un caractère
C'est ce que fait
Asc(Mid(chaine,i,1))
dans la boucle
For i = 1 to len(chaine) ... Next i

Si on décompose :
Mid(chaine,i,1) extrait le caractère à la position i
dans la chaine
Asc(Mid(chaine, i,1)) retourne le code ASCII du caractère
à la ième position dans la chaine


OK ?

Bonjour,

Merci pour la réponse.

Je me suis peut être mal expliqué. Ce que je cherche, c'est à obtenir le
code caractère de chaque une des letres qui composent mon texte.

Est-ce possible ?





Bonjour,
Avec la même interrogation qu'Hervé mais sait-on jamais !

Avec ceci peut-être :

Function zz()
Dim chaine As String, nb As Integer
Dim i As Byte, total As Integer
'on admet pour le fun que la longueur de la chaine
' n'excède pas 255 caractères !
chaine = "Delamontagne Jean-Michel"
For i = 1 To Len(chaine)
total = total + Asc(Mid(chaine, i, 1))
Next i
MsgBox chaine & " en numérique c'est : " _
& Format(total, " # ##0,00")
End Function





--
A+
Eric
http://users.skynet.be/mpfa/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr


Avatar
3stone
"Eddan"
| Ce que je cherche, c'est à obtenir le
| code caractère de chaque une des letres qui composent mon texte.


Ah...


donc j'ai perdu !!

:o))



--
A+
Pierre (3stone) Access MVP
Perso: http://users.skynet.be/accesshome/
Conseils MPFA: http://users.skynet.be/mpfa/
1 2