find list of files in different subfolder and move them to one folder

Good day

This code works if you do it manually

Please Login or Register  to view this content.

but I want to loop through a list in column A which sometimes can be long
trying to use this, but does not work. Please help to fix

Please Login or Register  to view this content.