Importation fichier txt dans excel

[loutredijon]

Bonjour à tous,
Voila mon problème j'ai un fichier .txt avec en séparateur des ; je voudrais créer une macro qui me permette d'importer le fichier texte en transformant les ; en colonne et une autre macro qui me permettrait apres modification du fichier excel de pouvoir m'importer en fichier txt.

 

[Staple1600]

Re : Importation fichier txt dans excel

Bonjour


Regardes en bas de ton message

Dans Discussions Similaires

Tu trouveras des exemples.

Tu peux aussi utiliser le moteur de recherche du forum.

PS:
Voici un exemple simple issu de l'enregistreur de macro

Sub Macro_import()
Dim Fichier As String
'ici adapté le chemin et le nom du fichier
Fichier = "C:\WINDOWS\Bureau\test.txt"
Workbooks.OpenText Filename:=Fichier, Origin:= _
        xlWindows, StartRow:=1, DataType:=xlDelimited, TextQualifier:= _
        xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, Semicolon:=True, _
        Comma:=False, Space:=False, Other:=False
End Sub

 

[Catrice]

Re : Importation fichier txt dans excel

Bonjour,

Essaie ceci :

Sub Test()
Chemin = "C:\Test.txt"
Workbooks.OpenText Filename:=Chemin, DataType:=xlDelimited, Other:=True, OtherChar:=";"
End Sub