Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Exporter en .txt sans séparations

FrankOVD

XLDnaute Nouveau
Bonjour

J'ai un fichier où toutes les colonnes doivent avoir une largeur fixe. Par exemple, le chiffre 15 doit s'afficher 00000000015,000 et le nom 'JOHN Smith' contient des espaces à la fin pour faire 40 caractères.

Ce que j'ai besoin de faire maintenant, c'est d'avoir toutes ces informations dans un fichier ASCII sans que les données de mes colonnes ne soient séparées par des tabulations et sans que ceux-ci ne perdent leur mise en forme.

Aussi, j'aimerais pouvoir afficher chaque enregistrement sur deux lignes pour en faciliter la lecture:

Ex:
Code:
EU|0000|00|7465|483|00|JOHN SMITH     |France    |CA|102-34P|
 EU|0001|00|7465|484|00|HENRI LAVOIE   |Belgique  |CA|104-23R|
 EU|0001|00|7468|490|01|JULIE ROY      |Irlande   |CA|100-11M|
Deviendrais
Code:
EU000000746548300JOHN SMITH     France      
 CA102-34P
 EU000100746548400HENRI LAVOIE   Belgique   
 CA104-23R
 EU000100746849001JULIE ROY      Irlande     
 CA100-11M

Message édité par: FrankOVD, à: 28/07/2005 15:38

Message édité par: FrankOVD, à: 28/07/2005 15:40
 

sylv900

XLDnaute Occasionnel
salut
j'utilisait ce code :
nbligne = ActiveSheet.UsedRange.Rows.Count
For i = 1 To nbligne
ligne = Range('A' & i) & Space(15 - Len(Range('A' & i))) & Range('B' & i) & Space(15 - Len(Range('B' & i))) & Range('C' & i) & Space(15 - Len(Range('C' & i))) & Range('D' & i) & Space(15 - Len(Range('D' & i))) & Range('E' & i) & Space(15 - Len(Range('E' & i))) & Range('F' & i) & Space(15 - Len(Range('F' & i))) & Range('G' & i) & Space(15 - Len(Range('G' & i))) & Range('H' & i)
Print #1, ligne
Next

afin d'obtenir un fichier txt avec les valeurs alignée d'une ligne sur l'autre, si ça peut t'aider...
 

FrankOVD

XLDnaute Nouveau
La mise en forme de mes champs est déjà faite et comme je ne suis pas très pro en VBA, j'a'aurais un peu de mal a adapter ce code, pourrais-je vois ce que ça donnerais sans mise en forme descaractères?
 

chris

XLDnaute Barbatruc
Bonjour
Solution simple :
Exporte au format PRN.
Pour déterminer la largeur des colonnes joue sur les titres : complètes les par des espaces à concurrence de la largeur souhaitée.
 
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…