Importer txt dans excel

Bonjour,

Pourriez-vous m'indiquer pourquoi le code suivant a une erreur et n'importe pas le fichier txt dans la feuille active de mon fichier excel?

Code:

---

1 2	Application.ActiveWorkbook.Sheets("Feuil1").OpenText Filename:="L:\COMMUN\fichier.txt", _ Origin:=xlWindows, StartRow:=1, DataType:=xlDelimited, Semicolon:=True

---

Merci d'avance! :ccool:

Bonsoir,

ni Sheets , ni WorkSheet ne connaissent la méthode openText, la touche F2 puis l'explorateur d'Objet peu te permettre de vérifier cela

Trouver des informations sur classes,méthodes, événements... d'un projet ?

Merci bbil!

Mais le problème c'est que quand j'écris:

Code:

---

1 2	Workbooks.OpenText Filename:="L:\COMMUN\fichier.txt", _ Origin:=xlWindows, StartRow:=1, DataType:=xlDelimited, Semicolon:=True

---

le document txt est importé dans un nouveau fichier excel!

Je souhaiterais qu'il se copie sur un fichier excel déjà ouvert. Et ca bugge aussi avec ActiveWorkbook :calim2: