How do I print the read-only status of Excel file?

We need to print out that an Excel file is read-only for our SOX testing. We
have printed the message using Hypersnap but would like a solution within
Excel.