Copy files to directory, mark read only -r

[Mitch_McComb]

Hi everyone!

I'm a newbie when it comes to vba and macros.
I can usually modify code here and there to get what I want, but this time I'm completely stumped.

Hopefully there is a simple solution. What I'm trying to accomplish seems pretty simple =-)

Here is what I'm trying to do.
I have a spreadsheet that contains a running list of multiple "Read Only" files, descriptions, locations, etc... Column M contains the file path name. Column F contains the file descriptive name.

I want to highlight single (or multiple) items in column F > select a macro to prompt a "save to" location > Pick a save path > have files copied to that location with out read-only attributes. Files types will be both word and excel.

Currently, we have a similar setup (Case E) to copy excel files to a specified directory and open the file. Through testing, the read-only attribute of this setup defaults to -r (Perfect).

1. I would like to modify this code to copy the files and set read-only to -r without opening the file.

2. I would like to duplicate the code to copy word files and set read-only to -r without opening the file.

We are using "Cases" (Column N) to depict instruction for the macro button to follow.

[Mitch_McComb]

comment removed

[Mitch_McComb]

Thank you (.txt file attached)