Copy files from a folder to another

Hello Guys!!

I am trying to code in VBA to copy multiple selected files from a folder to another.
My idea is to click the button, than select multiple files name in cells range.
FromFolder would be a Folder that won't change, so i put the folder path (this folder is located in a network).
The ToFolder is a folder that each user has in your own computer, so before click the button the user needs to put the folder path destination in Cell "A1".


Code:

Please Login or Register  to view this content.

When I run the code, the error 53 appears.
Does Anyone can help me figured out what is happening?

What is in A1?
and what is Xval exactly when it fails?
It is possible you just need a "\" at the end of your paths, but hard to know for sure without more data.

how do you "select multiple files"? I assume by making the range several cells?
I suspect

Please Login or Register  to view this content.

should be

Please Login or Register  to view this content.