rajouter des séparateur pour importation

rajouter des séparateur pour importation - VB/VBA/VBS - Programmation

Marsh Posté le 09-04-2008 à 10:23:49    

bonjour,
je dois importer un fichier de données au format texte sous Excel,  
ce fichier est composé des coordonnées de nombreux points.
chacun de ces points est défini par ses coordonnées X Y Z, et le tout entre parenthèses.

Code :
  1. ....
  2. {Point(134.018798828,12.223546393,286.546752930)},
  3. {Point(134.608535767,11.341906153,286.635620117)},
  4. ...


dans l'outil d'importation, plusieurs séparateurs sont proposés par défaut, et il est également possible d'en ajouter un de son choix.
j'ai sonc choisi comme séparateur la virgule "," ainsi que la parenthèse "(".
 mais ce que je souhaiterais ce serait ajouter également comme séparateur l'autre parenthèse associée " )"
 
j'ai essayé de la rajouter dans le code en mettant
 
   

Code :
  1. Workbooks.OpenText Filename:= _
  2.         "C:\Monfich", _
  3.         Origin:=xlWindows, StartRow:=1, DataType:=xlDelimited, TextQualifier:= _
  4.         xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, Semicolon:=False, _
  5.         Comma:=True, Space:=False, Other:=True, OtherChar:=("(" And " )" ), FieldInfo:= _
  6.         Array(Array(1, 1), Array(2, 1), Array(3, 1), Array(4, 1), Array(5, 1))
  7. End Sub


 
mais cela ne fonctionne pas
si vous avez une idée...

Reply

Marsh Posté le 09-04-2008 à 10:23:49   

Reply

Marsh Posté le 09-04-2008 à 10:36:01    

Salut, Le fichier Lecture_01.xls elimine les "{Point(" et " )}" de l'import, je ne sais pas si c'est cela que tu veux ?
donc à tester et adapter à ton contexte http://cjoint.com/?ejkJEp7GtT

Message cité 1 fois
Message édité par kiki29 le 09-04-2008 à 10:40:06
Reply

Marsh Posté le 09-04-2008 à 11:26:52    

kiki29 a écrit :

Salut, Le fichier Lecture_01.xls elimine les "{Point(" et " )}" de l'import, je ne sais pas si c'est cela que tu veux ?
donc à tester et adapter à ton contexte http://cjoint.com/?ejkJEp7GtT


 
c'était exactement ce que je cherchais, Merci beaucoup kiki29

Reply

Marsh Posté le 09-04-2008 à 11:56:00    

comme souvent, la réponse à une question amène à toujours plus de questions...
donc en fait si je veut ajouter d'autres séparateurs dans la const

Code :
  1. Const Separateur As String * 1 = ","


par exemple si je veux ajouter un point "." ou tout autre chose, peut on le faire dans la même const? ou faut t il en créer un autre?
est il possible alors de spliter le texte en injectant comme séparateur une constante contenant plusieurs entités
et comment écrit on le séparateur "retour a la ligne" et "tab"
merci


Message édité par zipohi2 le 09-04-2008 à 11:57:53
Reply

Marsh Posté le 09-04-2008 à 12:10:47    

Voir l'aide en ligne sur Constantes
et dans Constantes Visual Basic : Constantes Diverses
de même pour Split
Il te faudra réécrire ta propre fonction de Split s'il y a des séparateurs multiples
A titre d'exemple de split multiple voir http://cjoint.com/?ejmyzz1SrS


Message édité par kiki29 le 09-04-2008 à 12:25:04
Reply

Marsh Posté le 09-04-2008 à 16:24:12    

oki
merci beaucoup kiki29

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed