Editing a recorded macro of a csv import error

Let's say I have a valid .csv file path in A1 and I want to write a macro that imports whatever file is in A1. What I did was to record a macro and browsed for the specific file to see the code, then edit it such that the file path is the one in cell A1 but it's giving me a 424 error. Here's what I'm working with:

With ActiveSheet.QueryTables.Add(Connection:= _
"TEXT;selected file path" _ {changed this to "TEXT;"&Cells(1,1) _}
, Destination:=Range("$A$1"))
.Name = "selected file name" {What can I change this to such that it's the file name of the file path in A1? (this can vary based on user input)}
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = True
.RefreshOnFileOpen = False
.RefreshStyle = xlInsertDeleteCells
.SavePassword = False
.SaveData = True
.AdjustColumnWidth = True
.RefreshPeriod = 0
.TextFilePromptOnRefresh = False
.TextFilePlatform = 437
.TextFileStartRow = 1
.TextFileParseType = xlDelimited
.TextFileTextQualifier = xlTextQualifierDoubleQuote
.TextFileConsecutiveDelimiter = False
.TextFileTabDelimiter = False
.TextFileSemicolonDelimiter = True
.TextFileCommaDelimiter = False
.TextFileSpaceDelimiter = False
.TextFileColumnDataTypes = Array(1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1)
.TextFileTrailingMinusNumbers = True
.Refresh BackgroundQuery:=False
End With

Any help would be greatly appreciated.

bump bump bump

Not sure about your recorded Macro.. but try this..

Change sheet names etc to suit.. add full filepath in A1.. example: C:\Users\apo\Desktop\csv\test.csv

Results start in A2 down...

Please Login or Register  to view this content.

I tried testing it and it gives me a subscript out of range error.

Check the Sheet names are correct in all places and file path is correct..

They're correct. I made a new workbook and have the correct file path in A1.