Transforme des données en numeric sous vb exc

Fermé
ab90 Messages postés 13 Date d'inscription vendredi 27 août 2004 Statut Membre Dernière intervention 18 janvier 2006 - 18 janv. 2006 à 18:15
JvDo Messages postés 1978 Date d'inscription mercredi 27 juillet 2005 Statut Membre Dernière intervention 28 septembre 2020 - 19 janv. 2006 à 00:41
Bonjour à tous,

après avoir ouvert un fichier texte de données avec assistant importation je n'arrive pas à modifier le format de mes données avec cette macro.

Range("c:c").Select
Selection.Replace What:=".", Replacement:=",", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False

jusque la ça marche

Selection.NumberFormat = "0.00"

La aucun changement

Par contre en le faisant directement avec excel ça marche

Qui peut me renseigner

*
ROUE : NC65C
NUM_PIEC E: 87
OPERATEU R: HA
MACHINE : NX1 M1
COTE 8
42.000 41.924 -0.076 -0.140 -0.040 0.000
COTE 10
11.610 11.631 0.021 -0.100 0.100 0.000
P02TOL
38.040 38.050 0.010 -0.100 0.100 0.000
.PARA 15
0.000 0.009 0.009 0.000 0.100 0.000
.ANGU 17
0.000 0.014 0.014 0.000 0.050 0.000
.PARA 20
0.000 0.009 0.009 0.000 0.100 0.000
COTE 21
19.390 19.410 0.020 -0.100 0.100 0.000
.ANGU 25
0.000 0.015 0.015 0.000 0.050 0.000
ANGLE 3
52.000 52.004 0.004 -0.050 0.050 0.000
COTE 9
44.600 44.613 0.013 -0.100 0.100 0.000
COTE 11
0.000 0.031 0.031 -0.200 0.200 0.000
P01TOL
28.240 28.221 -0.019 -0.100 0.100 0.000
.PARA 12
0.000 0.033 0.033 0.000 0.100 0.000
.ANGU 14
0.000 0.033 0.033 0.000 0.030 0.000
.ANGU 23
0.000 0.023 0.023 0.000 0.030 0.000
.PARA 24
0.000 0.006 0.006 0.000 0.100 0.000
ANGLE 4
52.000 52.009 0.009 -0.050 0.050 0.000
COTE 1
34.000 33.728 -0.272 -0.300 -0.100 0.000
COTE 2
8.000 8.210 0.210 0.100 0.300 0.000
COTE 3 B E
12.500 12.703 0.203 0.200 0.400 0.000
COTE 3 B S
12.500 12.704 0.204 0.200 0.400 0.000
.PERPEN 7
0.000 0.001 0.001 0.000 0.035 0.000
.PERPEN7 P
0.000 0.003 0.003 0.000 0.035 0.000
COTE MZ1
55.334 55.354 0.020 -0.050 0.050 0.000
COTE MZ2
55.794 55.825 0.031 -0.050 0.050 0.000
COTE MZ3
55.304 55.312 0.008 -0.050 0.050 0.000
COTE MZ4
55.954 55.984 0.030 -0.050 0.050 0.000
.MZ2MZ1
0.000 0.012 0.012 0.000 0.070 0.000
.MZ4MZ3
0.000 0.022 0.022 0.000 0.070 0.000
.ECARTMA X
0.000 0.023 0.023 0.000 0.070 0.000


Comment faire pour insérer le fichier si vous en avez besoin?

merci beaucoup de votre aide

Vous pouvez aussi me transmettre sur
alain.brunner@power.alstom.com
A voir également:

3 réponses

JvDo Messages postés 1978 Date d'inscription mercredi 27 juillet 2005 Statut Membre Dernière intervention 28 septembre 2020 857
18 janv. 2006 à 19:15
bonsoir,

pour fournir le fichier, tu peux utiliser http://cjoint.com/

cordialement
0
ab90 Messages postés 13 Date d'inscription vendredi 27 août 2004 Statut Membre Dernière intervention 18 janvier 2006
18 janv. 2006 à 19:49
vous trouverez le fichier texte sous
http://cjoint.com/?bstOhwOLm6

0
JvDo Messages postés 1978 Date d'inscription mercredi 27 juillet 2005 Statut Membre Dernière intervention 28 septembre 2020 857
19 janv. 2006 à 00:41
bonsoir,

voilà ( http://cjoint.com/?btaJlNfHc2 ) un essai de transformation du fichier source TXT en tableau XLS

je suis passé par de la conversion plutôt que par du rechercher/remplacer

la macro doit s'appeler transfo_num()

cordialement
0