Discussion :

[touche_a_tout]

Bonjour,
J'ai une appli qui extrait le contenu d'un tableau XL sous forme de listing .txt au moyen d'une boucle Do...Loop en utilisant "Print #1" . Je voudrais que la sortie se fasse dans un tableau à 2 colonnes avec une nouvelle ligne à chaque boucle Loop, en plaçant le listing complet dans une colonne et un des élément du listing sur lequel trier tout le tableau répété dans la seconde colonne. Le tableau Excel a environ 90 colonnes et selon les cas entre 15 et 180 lignes donc aucun rapport avec la structure du tableau produit par le code. Je ne sais pas quelle(s) commande(s) VBA utiliser pour créer des lignes et des colonnes et je n'ai trouvé ça nulle part. Est-ce que quelqu'un a une idée ? Merci d'avance. Je joins un exemple miniature pour plus de clarté.
Cordialement
touche_a_tout

[Invité]

Bonjour,

Je ne comprends pas bien la demande 🤔

De part sa nature, un fichier texte ne peut contenir de colonnes ou éventuellement avec une tabulation mais rien ne sera aligné

Quel est le but de tout ça ?

A+

[touche_a_tout]

Bonjour BrunoM45 et tout le monde,
Ma demande était fumeuse, par contre votre réponse est parfaitement claire: un fichier texte ne peut pas, de par sa nature même, avoir de mise en forme, merci de me l'avoir rappelé. Quant au but de tout ça, c'est un peu compliqué. Mes tables XL contiennent les données de centaines d'actes d'état-civil (naissances, mariages, décès), avec dans les colonnes des noms, prénoms, dates, lieux, etc. L'appli dont je parle m'a déjà permis d'extraire de ces feuilles XL des centaines d'actes reconstitués qui servent de "preuves" de ce que contient ma généalogie.
Maintenant, je dois relier chaque événement de chaque individu (naissance, etc.) à l'acte qui le prouve. Pour ce faire, j'ai besoin d'un listing de mes actes pour avoir accès à tous leurs détails. Ce serait beaucoup facile si ces actes étaient classés par ordre alphabétique des individus concernés, comme dans ma pièce jointe. Je pensais à une solution en une passe qui fournirait un fichier contenant les instructions visant à introduire des lignes et des colonnes aux endroits voulus (ainsi qu'une répétition des termes sur lesquels les actes seraient classés dans un second temps) mais ça paraît impossible.
Repartons alors d'un listing au format texte dans lequel Print #1 m'aura permis d'introduire, aux endroits voulus, des caractères spéciaux (p. ex. $, £. ], etc.) que je pourrai remplacer ensuite (cherche et remplace) par les instructions permettant de créer, dans un texte continu, des lignes et des colonnes. Mais quels sont ces instructions; est-ce qu'elles existent au moins ?
J'ai été beaucoup plus long, mais peut-être pas plus clair ! Est-ce que quelqu'un peut m'aider à partir de ça ?
Merci d'avance pour toute piste.
Belle journée.
Cordialement
touche_a_tout

[78chris]

Bonjour à tous

Sans exemple de ce de quoi tu pars, difficile de te donner le chemin pour atteindre l'arrivée

[touche_a_tout]

Bonjour et merci 78Chris,
Flatté qu'un expert de votre niveau s'intéresse à ma question. Je n'ai pas de raison de principe de ne pas montrer de quoi il s'agit mais le fichier pèse près de 800 Ko, le code compte 3200 lignes et la sortie est paramétrée en fonction de mon arborescence, ce qui rend la chose un peu compliquée. Je peux fournir des échantillons moins lourds comme exemples (un extrait de feuille XL et un extrait de listing par exemple): est-ce que ça suffirait ? J'ai juste besoin d'un peu de temps pour préparer les échantillons. Qu'en pensez-vous ? Sinon je balance le tout en annexe à un post mais je ne me rappelle pas s'il y a une limite au poids des annexes.
Merci d'avance de votre retour.
Cordialement
touche_a_tout

[touche_a_tout]

Rebonjour 78Chris,
A tout hasard, je joins
- un extrait de feuille XL tout à fait similaire à celles que mon appli utilise.
- un doc word comparant un listing brut (colonne de gauche) et un listing transformé en tableau avec un élément extrait et placé dans une deuxième colonne sur laquelle le tout serait trié. C'est à quoi j'aimerais arriver. Merci de ton attention.
Cordialement
touche_a_tout