Close Open Text File - No Save Prompts

[dj44]

Good Morning,


how may i close an open text file on my desktop

Sub Close_File()


Dim FilePath As String

'File Path of Text File

  FilePath = "C:\Users\DJ\Desktop\LA122.txt"


  'FilePath.Close
  
  Close #1

End Sub

I dont need to open it - I just want to close the already open file without any prompts or anything to save

[mdmackillop]

Assuming it is open in the same instance of Excel

    FilePath = "LA122.txt"
    Workbooks(FilePath).Close False

[mdmackillop]

... otherwise https://social.msdn.microsoft.com/Fo...orum=accessdev

[dj44]

Hello M,

excel created the file initially.

now later i just want to close it - because i dont want it anymore

ok let me do some investiagtion

[Spkumar]

NOT WORK THIS CODE,......................