Can this be done better? - 'selective protection'

Tech-Archive recommends: Fix windows errors by optimizing your registry

Hi All,

I have a requirement whereby l need to make only particular sheets
available for data entry dependent on several different passwords /
logons.

Complications:

1) All sheets need to be protected so that data entry is restricted to
unlocked cells.
2) All sheets must be visible (users need to follow the audit trail
even if a department is not under their jurisdiction.)

I am sure that somebody has done similar to this in the past and
wonder if anybody can provide or suggest a solution. If not can they
improve on the following strategy? (assumes all sheets protected on
opening)

1) Workbook_open event userform for password entry
2) Password 'mapped' to select case statement
3) Select case statement changes the 'enable selection' property in
all unavailable 'input' type sheets to xlNoSelection
4) Reset selection property on Workbook_close

The problem l can forsee with this strategy is that the workbook would
have to be saved / closed to change user permissions unless l provide
a method within the workbook via button / menu.

All contributions welcome

Regards

Michael

.

Quantcast