begin process at 2008 08 22 04:55:31
1 229 775 membres
46 nouveaux aujourd'hui
14 267 membres club

Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum.
Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

Sujet : remplacer les caracteres sepciaux par espace [ Archives Visual Basic / VBA ] (farouha)

remplacer les caracteres sepciaux par espace le 12/05/2006 10:47:04

farouha
je suis en stage il ont des bases de données faites a la con .
je fais l importation de excel vers  Access des données a travers une aplication VB.
l'importation se fait normalement mais dès qu'il y a un caractere special l insertion 
s arrete et il affiche un message d erreur
ya t il une fonction qui peu arreté cela
pouvez vous m aidé.
merci

Re : remplacer les caracteres sepciaux par espace le 12/05/2006 11:06:18

TrafMaxime
En vb.net, y'a la fonction replace :
dim s1 as string
s1 = s1.replace(".","/")
-> remplace les points par des slash ds ton string s1...

mais ton problème m'a l'air bizarre.. il est pas sensé avoir des difficultés avec un certain caractère, mais plutôt avec des champs vides qui ne devraient pas l'être...

.Maytheforcebewithyou.Maxime.



Re : remplacer les caracteres sepciaux par espace le 12/05/2006 11:20:59

hublet
Bonjour,

et en plus, tu peut aussi jouer sur les codes ascii dans une boucle
avec la commande instr couplé au replace, j'ai pas de code sous
la main

Ca va ralentir un peu, mais tu est sur de tout prendre.

Etienne

Re : remplacer les caracteres sepciaux par espace le 12/05/2006 11:52:13

farouha
ok merci mais je vous explique encore
quand j m 'importe de excel parfois ya des ptit carrés dans la cellules ( normalement c un retour a la ligne) et c la kil blok mais pour les autres caractères ca y est c traité
voila

Re : remplacer les caracteres sepciaux par espace le 12/05/2006 12:12:15

TrafMaxime
C'est pour ça qu'il faut coupler replace et CHR dans ton code : (instr, c'est autre chose.. enfin moi je parle en vb.net.. toujours)

dim str_excel as string = "ce que tu recupere de
                                                                   Excel"
je connais pas leurs valeurs exactes, mais si tu trouves la coordonnée du retour chariot (mettons 49..) en ascII et celui de l'espace (45, allez) et tu pourras faire :

str_excel = str_excel.replace(chr(49), chr(45)) ou quelque chose qui s'en approchera...

.Maytheforcebewithyou.Maxime.




Classé sous : données, espace, caracteres, remplacer, sepciaux

Participer à cet échange

Pub



Appels d'offres

CalendriCode

Août 2008
LMMJVSD
    123
45678910
11121314151617
18192021222324
25262728293031

Boutique

Boutique de goodies CodeS-SourceS