Discussion :

[bilou_12]

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 :

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

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

Merci d'avance!

[SfJ5Rpw8]

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 ?

[bilou_12]

Merci bbil!

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

Code :

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

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