Excel VBA getting table columns by name in a specific sheet within a closed workbook

[Klash Ville]

Hello everyone, before I wish to explain my question, I want to say that this forum has helped me a lot solving my automated excel obstacles

So right now, I have this piece of code that simple asks the user for the workbook location, name and sheet name in order to fetch the entire sheet. But like the title says, I wish to concentrate that fetching to table columns by name:

Sheets.Add After:=ActiveSheet

Range("D3").Select
ActiveCell.Value = InputBox("Please insert the desired file path:")
Range("D4").Select
ActiveCell.Value = InputBox("Now please insert the name of the file:")
Range("D5").Select
ActiveCell.Value = InputBox("Lastly, please insert the name of the target sheet:")
 
Sheets("Sheet1").Select
PathName = Range("D3").Value
Filename = Range("D4").Value
TabName = Range("D5").Value
ControlFile = ActiveWorkbook.Name
Workbooks.Open Filename:=PathName & Filename
Sheets(TabName).Copy After:=Workbooks(ControlFile).Sheets(1)
Windows(Filename).Activate
ActiveWorkbook.Close SaveChanges:=False
Windows(ControlFile).Activate


Worksheets("Sheet1").Activate