Discussion :

[breizhcola29]

Bonjour,

je sais que ce sujet existe déjà sur de nombreux site, cependant, je n'arrive toujours pas à résoudre mon problème.
J'ai un fichier texte qui se présente sous cette forme :
01/01/0000 00:00 0000.
Cela sur plusieurs lignes ...

Je n'arrive pas à remplir la colonne A avec la date, la colonne B avec l'heure et la colonne C avec le nombre ...
(l'espace est plus important entre l'heure et la nombre qu'entre la date et l'heure)

Merci de vos réponses !

[unparia]

Bonjour
Ce qui donne à penser que chaque ligne de ton fichier contient non trois données (date, heure et nombre), mais deux (une donnée date/heure et une donnée nombre), probablement séparées par une tabulation.
A lire, donc, comme telles, en utilisant la fonction split pour les séparer
Si tu veux ensuite éclater la première en une donnée date et une donnée heure, utilise par exemple la fonction format

[geogeo70]

bonsoir,

On peut utiliser l'insertion du fichier texte par l'onglet données, et ensuite fichier texte. Il suffit de prendre l'espace comme séparateur de champ (choisir délimiteur).
voici une copie d'écran :


suivre les actions 1,2,3

Vous pouvez enregistrer la commande en macro si vous voulez le faire en VBA

Salutations
geogeo

[patricktoulon]

bonsoir
exemple

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Sub textinsheet_textocolumn()
Dim laChaine As String, x, fichier As String
fichier = "C:\Users\polux\Desktop\classeur 1.txt"
x = FreeFile
 Open fichier For Input As #x
      tablo = Split(Input(LOF(x), #x), vbCrLf)
  Close #x
  Cells(1, 1).Resize(UBound(tablo) + 1, 1) = Application.Transpose(tablo)
   Columns("A:A").TextToColumns Destination:=Range("A1"), DataType:=xlDelimited, Space:=True
 
End Sub

[breizhcola29]

Merci de vos réponse ! J'ai finalement réussi à trouvé en découpant chaque ligne avec les fonctions left et right .