copier le contenu d'un fichier texte

  • Initiateur de la discussion matthieu
  • Date de début
M

matthieu

Guest
bonjour,

je souhaiterais une fonction qui permettrais d'ouvrir un fichier texte quelconque, de copier son contenu et de le coller dans une feuille de calcul excel

Car en fait je souhaite que l'on puisse choisir son fichier texte
avec un explorateur

merci
 

Sylvain

XLDnaute Occasionnel
Bonjour,

pour le code d'ouverture du fichier avec getopenfilename pour choisir le fichier :

Sub import_texte()
  fileToOpen = Application.GetOpenFilename('Text Files (*.txt), *.txt')
 
If fileToOpen <> False Then Workbooks.OpenText Filename:=fileToOpen
End Sub
 

Discussions similaires

Membres actuellement en ligne

Statistiques des forums

Discussions
311 725
Messages
2 081 941
Membres
101 847
dernier inscrit
Djigbenou