fermeture de fichier .txt

[MLT]

Bonjour,

Je n'arrive pas à faire un code capable de fermer un classeur excel qui est un fichier texte, c'est à dire qu'il y a un classeur ouvert du nom de mesure.txt.

Quelqu'un saurait faire sa ? 😛

 

[Staple1600]

Re : fermeture de fichier .txt

Bonjour

Je t'ai déjà donné la réponse dans ton autre fil !!!
Application.ScreenUpdating = False
If Not FichierChoisi = False Then
Workbooks.OpenText Filename:=FichierChoisi, DataType:=xlDelimited, Tab:=True
Set TXTFile = ActiveWorkbook
ActiveWorkbook.Sheets(1).Copy WBK.Sheets(1) ' on copie tout dans le classeur stockant la macro
TXTFile.Close False ' on ferme mesure.txt 'ICI !!!!!! LA REPONSE DEJA DONNEE ;-)
End If

Décidément c'est une épidémie ces fils en doublons 😉