combine multiple excels into single excel as different sheets

I have 4 excel sheets in a folder.

Apple
Mango
Orange
Banana
Final
I wanted all the excel contents to be added as sheets in “Final”excel in the same path. The sheet names should be same as file names (Apple, Mango, Orange, Banana). How can I do this through Macro?

Any help will be highly appreciated.

Thanks in advance.