how to link userform / ComboBox value to import text file

Hello Everyone. I am novice and seek your assistance to make more effective macro.

There are about 80 text files in a folder. Those text files are named P01.txt, P02.txt and so on. Below I have a macro to import data from P39.txt

However I am looking for more efficient macro to avoid changing file path when I have to import any other file between P01.txt to P99.txt

I thought one solution would be linking with userform's value. For example on the file I have attached, there is ComboBox which contains value P01 to P99. Is it possible to select value and import txt file? suppose if I select P05 on ComboBox and run the macro - would it be possible to get P05.txt imported on Destination? Hope I have been able to clarify the scenario, but not sure it may work as I wish. Any better suggestion is most welcome.


Any help would be appreciated.

Many thanks and regards

Private Sub sbImportData_Click()

ThisWorkbook.Worksheets("VAR").Cells.Clear

Application.CutCopyMode = False
    With Sheets("VAR").QueryTables.Add(Connection:= _
"TEXT;C:\Users\Dell\Desktop\VBA workshop\Practice\P39.txt", Destination:=Sheets("VAR").Range("$A$1"))
        .Name = "name_of_file"
        .FieldNames = True
        .AdjustColumnWidth = False
        .TextFileColumnDataTypes = Array(1)
        .TextFileTrailingMinusNumbers = True
        .Refresh BackgroundQuery:=False
    End With
    
    
    
    Range("E7").Select
    
    
End Sub