Transforme des données en numeric sous vb exc
ab90
Messages postés
13
Date d'inscription
Statut
Membre
Dernière intervention
-
JvDo Messages postés 1978 Date d'inscription Statut Membre Dernière intervention -
JvDo Messages postés 1978 Date d'inscription Statut Membre Dernière intervention -
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
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:
- Transforme des données en numeric sous vb exc
- Fuite données maif - Guide
- Trier des données excel - Guide
- Vb - Télécharger - Langages
- Sauvegarde des données - Guide
- Supprimer les données de navigation - Guide
3 réponses
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
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