creer un script a partir des valeurs d'un fichier - VB/VBA/VBS - Programmation
Marsh Posté le 07-07-2007 à 08:25:07
Bonjour, Je suis vraiment débutante en ce qui concerne les macros alors j'ai vraiment besoin de vous ! Voilà : Dans un fichier texte A.txt j'ai une liste de valeurs: -30 -30 0 1 -23.253 0.14578 116.15 -25.5 -30 0 1 -15.731 0.13639 119.2 -21 -30 0 1 -9.8083 0.17571 120.76 -16.5 -30 0 1 -3.7341 0.18953 122.16 ... A chaque ligne correspond un élément avec ses caractéristiques, chaque colonne correspond a un type de caractéristique : X0 y0 z0 L teta amplitudeI phaseI -30 -30 0 1 -23.253 0.14578 116.12 …. Je voudrais récuperer certaines de ses valeurs pour les placer dans un fichier B.txt sous cette forme : begin excitation begin e_dipole // dipoles électriques no_e_dipoles = 3 //nombre de dipôles total : le nombre de lignes e_dipole = 1 // 1er dipole : il faudrait l' incrémenter magn_Idl = 0.14578 //amplitude phase_Idl = 116.12 //phase theta =-23.253 //angle theta phi = 0 [#ff0e00]//angle phi reste a 0 location =-30 -30 0 //coordonées e_dipole = 2 magn_Idl = 0.13639 phase_Idl = 119.2 theta = 15.731 phi = 0 location = -25.5 -30 0 .... end e_dipole end excitation[/#0055aa] Merci.
Make sure you enter the(*)required information where indicate.HTML code is not allowed
Marsh Posté le 07-07-2007 à 08:25:07
Bonjour,
Je suis vraiment débutante en ce qui concerne les macros alors j'ai vraiment besoin de vous !
Voilà :
Dans un fichier texte A.txt j'ai une liste de valeurs:
-30 -30 0 1 -23.253 0.14578 116.15
-25.5 -30 0 1 -15.731 0.13639 119.2
-21 -30 0 1 -9.8083 0.17571 120.76
-16.5 -30 0 1 -3.7341 0.18953 122.16
...
A chaque ligne correspond un élément avec ses caractéristiques, chaque colonne correspond a un type de caractéristique :
X0 y0 z0 L teta amplitudeI phaseI
-30 -30 0 1 -23.253 0.14578 116.12
….
Je voudrais récuperer certaines de ses valeurs pour les placer dans un fichier B.txt sous cette forme :
begin excitation
begin e_dipole // dipoles électriques
no_e_dipoles = 3 //nombre de dipôles total : le nombre de lignes
e_dipole = 1 // 1er dipole : il faudrait l' incrémenter
magn_Idl = 0.14578 //amplitude
phase_Idl = 116.12 //phase
theta =-23.253 //angle theta
phi = 0 [#ff0e00]//angle phi reste a 0
location =-30 -30 0 //coordonées
e_dipole = 2
magn_Idl = 0.13639
phase_Idl = 119.2
theta = 15.731
phi = 0
location = -25.5 -30 0
....
end e_dipole
end excitation[/#0055aa]
Merci.