VBA code to import text file to the fixed excel file

Hi

Currently I need a macro to import text file into a excel file and this is the code below. However every time when the text file is import, a new excel file will be created, can anyone help me to change the code, so that the text file will always import into the same excel file name " monthly standard working file".

      Dim ResultStr As String
      Dim FileName As String
      Dim FileNum As Integer
      Dim Counter As Double
      FileName = InputBox("Enter the Text File's name, e.g. test.txt")
      If FileName = "" Then End
      FileNum = FreeFile()
      Open FileName For Input As #FileNum
      Application.ScreenUpdating = False
      Workbooks.Add template:=xlWorksheet
      Counter = 1
      Do While Seek(FileNum) <= LOF(FileNum)
          Application.StatusBar = "Importing Row " & _
             Counter & " of text file " & FileName
          Line Input #FileNum, ResultStr
          If Left(ResultStr, 1) = "=" Then
             ActiveCell.Value = "'" & ResultStr
          Else
             ActiveCell.Value = ResultStr
          End If
          If ActiveCell.Row = 65536 Then
             ActiveWorkbook.Sheets.Add
          Else
             ActiveCell.Offset(1, 0).Select
          End If
          Counter = Counter + 1
      Loop
      Close
      Application.StatusBar = False
     
      End Sub