Private before your sub means that it can only be used in the module .

so change to

Sub NotifyUserGeneral()If ActiveSheet.ProtectContents = True And Not mMessageDisplayed Then MsgBox "Except for the data cells shaded in light blue with black font the rest of this worksheet is protected!" mMessageDisplayed = TrueEnd IfEnd Sub

Featured Post

Manage projects of all sizes how you want. Great for personal to-do lists, project milestones, team priorities and launch plans.
- Combine task lists, docs, spreadsheets, and chat in one
- View and edit from mobile/offline
- Cut down on emails

Improved? Move/Copy Add-in Replacement - How to avoid the annoying, “A formula or sheet you want to move or copy contains the name XXX, which already exists on the destination worksheet.”
David Miller (dlmille)
It was one of those days…
I wa…

The viewer will learn how to create two correlated normally distributed random variables in Excel, use a normal distribution to simulate the return on different levels of investment in each of the two funds over a period of ten years, and, create a …

This Micro Tutorial will demonstrate how to create pivot charts out of a data set. I also added a drop-down menu which allows to choose from different categories in the data set and the chart will automatically update.