Convertir .txt en Excel

[cccoste]

Bonsoir à tous,
J'ai besoin de convertir un fichier .TXT qui ne contient pas des séparateurs dans un fichier Excel.
Pouvez-vous m'aider?
Ci-joint le fichier.
Merci d'avance.

 

[Excel-lent]

Re : Convertir .txt en Excel

Bonjour et bienvenu sur le forum Cccoste,

Si tu nous en disais plus sur ton fichier .TXT!!!

A quoi doit ressembler ton fichier Excel après conversion du fichier TXT????

A priori, tu as plusieurs types de lignes différentes?

Chaque type de lignes a une forme bien définis?

Si oui à priori la conversion pourrait être assez simple!

Mais tant que tu ne nous dis pas le résultat que tu souhaites obtenir, difficile de t'aider!

Bonus : astuce pour extraire la date de ton fichier texte. Copier ton fichier dans Excel.

Pour convertir la date de ta première ligne placé en A1

=DATE(DROITE(GAUCHE(A1;8);4);DROITE(GAUCHE(A1;4);2);GAUCHE(A1;2))

Avantage, de cette méthode, excel reconnait le résultat obtenu comme une date, avec tous les avantages que cela comporte!

A te lire

Cordialement

 

[cccoste]

Re : Convertir .txt en Excel

Bonsoir,

Merci pour la réponse.
Les lignes ont bien un format précis. Cependant je n'ai pas d'exemple Excel.
Je voulais partir de ce .txt pour me faire un fichier Excel.
Je vais saisir une ligne sur Excel manuellement et je vais la poster demain.

 

[jeanpierre]

Re : Convertir .txt en Excel

Bonsoir cccoste, Bienvenue sur le forum, Excel-lent,

Avec Fichier/Ouvrir tu selectionnes Fichiers texte dans la zone Type de fichier et te positionnes sur le dit fichier et Ouvrir.

L'assistant d'importation s'ouvre. Tu coches Largeur fixe/Suivant et à la souris tu délimites ce que tu veux comme colonne.

Je t'ai fait un exemple avec la date, l'agence et les montants.

Etape suivante tu peux déjà supprimer les colonnes qui ne te sont pas utiles, sinon tu le feras sous Excel. Et Terminer.

De fait, certaines lignes ne sont plus exploitables mais elles n'ont pas de montant.

Joint fichier.

Bonne soirée

Jean-Pierre

 

[cccoste]

Re : Convertir .txt en Excel

Une autre question :

Comment passer de 23/09/2009 à 23092009?
-----------------------------
Pour convertir la date de ta première ligne placé en A1

Code:
=DATE(DROITE(GAUCHE(A1;8);4);DROITE(GAUCHE(A1;4);2);GAUCHE(A1;2))
_________________________

 

[jeanpierre]

Re : Convertir .txt en Excel

Re,

Déjà, as-tu mon fichier déposé à 22h17, en même temps que ton intervention ?

Pour ta nouvelle question : =(GAUCHE(A1;2)&"/"&STXT(A1;3;2)&"/"&DROITE(A1;2))*1

Cellule au Format jj/mm/aaaa

A te lire.

Jean-Pierre

 

[Excel-lent]

Re : Convertir .txt en Excel

Bonsoir le fil,

23092009

Si ton but et d'obtenir le résultat ci-dessus, le plus simple est de partir de ton fichier texte et d'écrire :

=GAUCHE(A1;8)

Tout simplement 😉

ou beaucoup plus compliqué mais identique :

=GAUCHE(A1;2)&DROITE(GAUCHE(A1;4);2)&DROITE(GAUCHE(A1;8);4)

Après côté aspect, tout dépendra du format de ta cellule. Si tu laisse format standard, tu obtiendras l'aspect voulu.

Ou aussi avec :
-> format nombre
-> décimal : 0
-> séparateur de millier : non coché

Bonne fin de soirée à tous

 

[jeanpierre]

Re : Convertir .txt en Excel

Re, Excel-lent,

Le fichier texte donnant en A1 : 23092009 j'ai donc supposé que cccoste voulait une date valide, d'où ma formule. (j'ai supposé aussi qu'il avait inverser les valeurs dans son texte lors de la saisie)

Attendons son retour.

Bonne nuit.

Jean-Pierre

 

[Staple1600]

Re : Convertir .txt en Excel

Bonsoir les gens du fil & du forum

Macro pour tester 3 solutions possibles

Sub MacroXXX()
Dim s As Worksheet: Set s = Sheets.Add
Dim r As Range:
With s
.Name = "TEST"
Set r = .Range("A1")
    With r
        .Value = CStr(Date)
            With .Offset(, 1)
                .FormulaLocal = "=$A$1"
                .NumberFormat = "ddmmyyyy"
            End With
            With .Offset(1, 1)
                .FormulaLocal = "=$A$1"
                .NumberFormatLocal = "jj/mm/aaaa"
            End With
        .Offset(1).FormulaR1C1 = "=TEXT(R[-1]C,""jjmmaaaa"")"
    End With
End With
End Sub

 

[Excel-lent]

Re : Convertir .txt en Excel

Re JeanPierre

Ok, attendons!

En attendant, tu veux une petite mousse? Trinquons ensemble 🙂

Bonne fin de soirée à tous

Edition : Bonsoir Staple1600! Tu te joins à nous?

 

[Staple1600]

Re : Convertir .txt en Excel

Bonsoir Excel-lent

Pour les formulistes et au cas ou cccoste n'aime pas trop le vba 😉

Si en A1 : =AUJOURDHUI() (au format date)
en B1=TEXTE(A1;"jjmmaaaa") --> 14112009

En A1, toujours =AUJOURDHUI()
Avec un format personnalisé : jjmmaaaa -> 14112009

Si en A1 : '23/10/2009
en B1 : saisir 1, CTRL+C, collage spécial, Multiplication
puis Format/Cellule/Personnalisé: jjmmaaaa
ou en C1: =TEXTE(B1;"jjmmaaaa") renvoie 23102009