Discussion :

[sarah67]

Salut,
j'ai (encore) un soucis :
j'ai une colonne "surface", sous format texte, qui contient des valeurs décimales. J'ai besoin de ces valeurs pour effectuer des calculs, mais bien évidement, je n'arrive pas juste à transformer les nombres par un changement de format texte vers numérique, à cause des points (comme dans 4.58)....mes données contenant des points sont simplement supprimées! Comme je n'ai pas le fichier de base, je ne sais pas comment récupérer ces données au format numérique. Comment faire ces calculs?

[cafeine]

Hello,

tu connais la fonction Replace() ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Replace(MaVar, ".", ",")

[sarah67]

Je ne connais pas grand chose Enfin, tu l'auras compris, depuis le temps que je vous harcèle

[sarah67]

est ce que ça revient au même que de chercher tous les points de la colonne pour les remplacer par des virgules?
Parce que ça, ça ne marche pas....J'ai des 0 à la place de toutes les valeurs qui comportent un point!

[cafeine]

merci de nous donner ton code, pour qu'on comprenne ton erreur.

merci de l'entourer par les balises code.

[sarah67]

je n'ai pas fait ça avec un code, mais avec la fonction "recherche" du mode "table de données"...

[cafeine]

je n'ai pas fait ça avec un code, mais avec la fonction "recherche" du mode "table de données"...

super !

mais as-tu essayé la solution que je t'ai proposée ?

ça peut se mettre dans une requête

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
UPDATE Matable
SET Macolonne = Replace(Macolonne, ".", ",")

[sarah67]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
UPDATE Producteurs_2005_reman
SET [Surface num]=Replace([Surface num], ".", ",")

ça me donne "fonction 'replace' non définie dans l'expression"

[sarah67]

Ça veut dire quoi, une fonction qui n'est pas définie ?

[cafeine]

Merci pour les balises

quelle est ta version d'access, Replace() n'est dispo que depuis la 2000

[sarah67]

J'ai Access 2000.
Une fonction non définie, c'est donc une fonction que le programme ne connait pas?

[cafeine]

sous 2000, j'ai testé sans encombre une requête de ce genre

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
SELECT Clients.nom, replace([nom],"a","@") AS exp
FROM Clients;

[sarah67]

donc, s'il n'y a pas moyen d'exécuter cette requête, je n'ai pas de moyen de récuperer ces données sous format numérique?

[cafeine]

donc, s'il n'y a pas moyen d'exécuter cette requête, je n'ai pas de moyen de récuperer ces données sous format numérique?

il faudra combiner le replace et une fonction de conversion de type pour obtenir un numérique :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

CDbl(Replace(MaColonne, ",", "."))

[sarah67]

c'est toujours cette fonction "replace" qui bloque, elle n'est "pas définie"...J'ai essayé avec "remplacer", mais ça ne change rien

[Tofalu]

sous 2000, j'ai testé sans encombre une requête de ce genre

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
SELECT Clients.nom, replace([nom],"a","@") AS exp
FROM Clients;

Non, ça ça fonctionne pas en théorie. Replace est disponible sous Access 2000 uniquement en VBA, pas en SQL... Un bug peut être. Solution réécrire une fonction publique en VBA qui utilisera REPLACE

Dans un module :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Public Function MonReplace(strChaine As String, strFind As String, strReplace As String) As String
MonReplace = Replace(strChaine, strFind, strReplace)
End Function

Le code de cafeine devient alors :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
SELECT Clients.nom, MonReplace([nom],"a","@") AS exp
FROM Clients;

[sarah67]

Il doit y avoir un gros bug tout court, dans mon ACESS: aucune fonction, que ce soit,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

"Replace"

,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

"cherche"

, ou

"MonReplace"

, ni aucune autre que j'ai pu essayer....

[Tofalu]

Tu as bien mis le code de la fonction dans un module ?

J'ai l'impression que tu ne comprends pas les principes de base du langage VBA

[cafeine]

pouarf ...

en effet, Replace() ne marche pas dans le cas général, j'oubliais que sur ma base de tests, j'ai une fonction personnalisée Replace() ...

désolé

[sarah67]

Tu as bien mis le code de la fonction dans un module ?

Je suis débile, mais pas à ce point...
et puis ça:

J'ai l'impression que tu ne comprends pas les principes de base du langage VBA

c'est sur, je ne comprends rien du tout, c'est bien pour ça que je demande

Mon ACCESS déconne vraiment! L'afichage de l'aide lors d'un message d'erreur ne fonctionne pas, les ; ne sont pas acceptés et les fonctions sous SQL ne passent pas...Dire que je suis en stage, et que personne ici ne sais m'aider!