[hacxx]

Source: https://vm.tiktok.com/ZMLWCRfFF

1) Open Excel
2) Type folder path on cell A1
3) Type your folder location on cell B1
4) Press Alt + F11
5) Insert > Module

6) Write

Code:

Sub Rename_all_files_in_a_folder() Folder_Name = Range("B1").Value File_Name = Dir(Folder_Name) Do Until File_Name = ""         Name Folder_Name & File_Name As Folder_Name &  _         "The text to add" & File_Name         File_Name = Dir         Loop End Sub