Refresh query from text source without manually selecting text file each time

How is the data in the text file separated? Assuming it to be comma delimited (CSV) you can open it as a workbook - Application.Workbooks.Open (FULLPATH & FILENAME). So to open ThisData.csv in folder DownLoadData on drive K it would be Application.Workbooks.Open("K:\DownLoadData\ThisData.csv"). This will open your text file and make it accessible to you. I would suggest you create a variable to hold your textfile as your code will refer to it a lot (you may already do this any way). EG

Dim wkbDownLoad as Workbook

Application.Workbooks.Open("K:\DownLoadData\ThisData.csv")

Set wkbDownLoad = ActiveWorkbook