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

Réponses
23
Affichages
2 K

Statistiques des forums

Discussions
299 703
Messages
1 978 592
Membres
206 298
dernier inscrit
yannick451