Copy data from folder and sub folder to master workbook base in sub folder names

Greetings, hope you all good.

I stuck and I really apreciate your help.
I have a folder whit sub-folders and in that subfolders the files to merge, sometimes 1 unic file but other times they are more then 50.
Then I have a master file with the name of the sub folders in divide sheets.
I need a VBA to loop through the sub folders and copy the data in all files to the Master based on Sub Folder names.

If the files are in sub folder 1 then copy data to Master File Sheet 1
If the files are in sub folder 2 then copy data to Master File Sheet 2
If the files are in sub folder 3 then copy data to Master File Sheet 3
If the files are in sub folder 4 then copy data to Master File Sheet 4

Can anybody help me please.