Macro to tell me which of a list of files is read only?

[tonywatsonhelp]

Hi Everyone,

I have a sheet called "Read Only"

in it I have a list of 50 files Column B5:B55

what I'd like is a macro to go to each file and test if it opens and if its read only add next to its name in Column C "Read Only"
so i can see which files are not closes for editing.

all documents are in the same file location which is

"S:" & StoreName & "\New Documents Folder\New Document " & StoreName & ".xlsm"

with "StoreName" being the names in column B5:B55

please help if you can

Thanks

Tony​