Is there a remote way to capture the users choices from the Sheet Protect Dialog box or some trick to getting them another way short of designing an entire form to simulate the dialog and use that?
Say for example I have 50 sheets, and I want all 50 to be protected but with the users choices of columns/rows/formatting from the protect dialog. All the sheets will take on the same protection choices, so the dialog prompts only once, then use those to protect all sheets?
Something like this fake code, just to show what I mean...
Code: Select all
Sub ProtectAll()
Dim sh As Worksheet
Choices = Application.Dialogs(xlDialogProtectDocument).Show
For Each sh In Worksheets
sh.Protect (Choices)
Next sh
End Sub