Programme VBA

cs_g_marvin Messages postés 17 Date d'inscription vendredi 9 juillet 2004 Statut Membre Dernière intervention 3 octobre 2005 - 6 juil. 2005 à 15:19
tbbuim1 Messages postés 940 Date d'inscription jeudi 20 février 2003 Statut Membre Dernière intervention 3 février 2011 - 8 juil. 2005 à 14:39
bonjour,
je dispose d'un fichier générer par une application avec des champs séparer par parfois par des espaces.
et je voudrais extraires les champs de mon fichier et le mettre dans un fichier excel par programmation VBA sous Excel car ca marche bien avec les macros mais le problème est k les champs des fichiers sont variables

merci de votre aide!!!!!!!!!!!!

3 réponses

tbbuim1 Messages postés 940 Date d'inscription jeudi 20 février 2003 Statut Membre Dernière intervention 3 février 2011 9
6 juil. 2005 à 15:54
Reformule ta question, en te disant que les gens qui vont te lire, ne
savent pas de quoi tu parles, et qu'ils ont besoin d'un maximum de
détails sur les logiciels utilisés langage, code, et d'avoir
éventuellement des exemples afin de mieux comprendre ton problème et
t'apporter la solution la plus adéquate.



Tu dis tu disposes d'un fichier. Très bien.

Mais quoi comme fichier? un fichier .txt?

Pourquoi ils sont pas tous le temps séparer par un espace.

Si ce n'est pas tout le temps le cas, la macro de création de table

ne marchera pas comme tu le veux, certains champs seront forcément regroupés.

Les chmaps des fichiers sont variables?

C'est à dire qu'un coup tu dois mettre celui là dans tel cellule, l'autre c un autre champ à mettre ailleurs.

alors dans un premier temps, il faudrait que le programme qui génère
tes fichiers, le fasse de façon à t'arranger pour le passage sous Excel!

Sinon, ce que tu demandes sera quasiment impossible à réaliser.

TBBUIM
0
cs_g_marvin Messages postés 17 Date d'inscription vendredi 9 juillet 2004 Statut Membre Dernière intervention 3 octobre 2005
7 juil. 2005 à 10:02
voici un exemple de mon fichier qui n'a pas d'extention

U225441 44810040MICHEL HUET HUET 23/12/1971M01/05/200501/07/2005800LYON RMA LYON RMA

voici un traduction de mon fichier

Identifiant \ code AGAPE //nom \ prénom \ second prénom \date de naissance//sexe//date de début//date de fin//code Agence//région \ service \ nom Agence.

\ représente les espaces
// pas d'espace

et je voudrais extraires les champs de ce fichier et le mettre dans un fichier excel par programmation VBA.
merci de votre aide.
0
tbbuim1 Messages postés 940 Date d'inscription jeudi 20 février 2003 Statut Membre Dernière intervention 3 février 2011 9
8 juil. 2005 à 14:39
Si ton fichier txt ce présente toujours de cette façon...

Tu peux t'en sortir en lisant le fichier (avec les techniques d lecture de fichier nombreuses sur VBF)

Et les méthodes qui te seront utiles

Lef, Right, Mid, Len, InStr...

Documentes-toi dessus...

Car par exemple, tu récupères toute la ligne dans une variable string.

Ensuite, il ne te reste plus qu'à la découper.

Sachant que l'identifiant va être Identifiant = Left(Var,7)

C'est à dire les 7 premiers caractères en partant de la gauche...

Pour les autres, sachant qu'ils peuvent être variable

tu peux parcourir la variable texte de lettre en lettre avec Mid par exemple

Et quand tu tombe sur un \ tu sais que tout ce qui a avant c'est le prénom par exemple

Ainsi de suite, tout en découpant et raccourcissant au fur et à mesure
ta variable string de départ en fonction des données extraites.
C'est
un peu fastidieux au départ, tu devras faire pas mal d'essai, mais tu
devrais t'en sortir, le tout étant de pouvoir lire le fichier et
récupérer la ligne dans un premier temps.

Bon courage.
TBBUIM
0