Discussion :

[tristan_sauvage]

Bonjour,

j'ai un petit problème avec des données que j'import chaque mois. mes données comportent des virgules en séparateur de milliers et des points en séparateurs de décimales.

je dois exécuter manuellement après l'import la fonction rechercher/remplacer dans la table mais vu le nombre d'enregistrements c'est super long.

j'aurais aimé automatiser cela, j'ai d'abord cherché avec une requete de mise à jour mais sans résultat. je me suis donc dirigé vers une procédure VBA mais j'avoue que la je bloque :

j'ai trouvé un commande qui appelle celle du menu édition mais je ne peux pas la paramétrer... y a t il un autre moyen simple et rapide pour procéder ??

voila ou j'en suis actuellement :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Sub remplacement_virgules()
On Error GoTo rmplct_virg_Err
 
    DoCmd.OpenTable "Extraction mens NOV", acViewNormal, acEdit
 
    DoCmd.RunCommand acCmdReplace
 
 
rmplct_virg_Exit:
    Exit Sub
 
rmplct_virg_Err:
    MsgBox Error$
    Resume rmplct_virg_Exit
 
End Sub

si quelqu'un pouvait m'aider la dessus ce serait sympa.

merci d'avance.

[Dolphy35]

Salut,

Recherche dans l'aide access sur Replace

ou dans la recherche avancée du Forum http://www.developpez.net/forums/sea...earchid=663552

Dolphy

[tristan_sauvage]

merci pour l'info j'ai fini par trouver quelques infos dans l'aide access mais aucun exemple de syntaxe... en revanche, ton lien ne marche pas.

[Dolphy35]

re,

merci pour l'info j'ai fini par trouver quelques infos dans l'aide access mais aucun exemple de syntaxe... en revanche, ton lien ne marche pas.

le lien correspond au résultat de la recherche avancée avec comme mots-cles => Replace.

lien de la recherche avancée, tu verras il y a plein de post à ce sujet.

Dolphy

[tristan_sauvage]

Merci beaucoup,

j'ai fini par faire une requete de mise à jour en utilisant la fonction replace
c'était les paramètres de cette fonction qui me manquaient:

en sql ca donne :

UPDATE [IMPORT DU MOIS] SET [IMPORT DU MOIS].[Val/Dev objet] = Replace([Val/Dev objet],",","");