Password question, but not a "how to crack" question.

[jproffer]

Hi folks,

I wonder if anyone knows a way to determine if a worksheet is protected WITH a password vs. protected without a password. I know how to check for protection in general...but not how to figure out if there's a password attached to that protection.

Any insight/direction is greatly appreciated

 

[jproffer]

Re: Password questiion, but not a "how to crack" question.

That's what I was thinking. That's going to be (part of) tomorrow's work. One question that will help though. The line "On Error Goto 0".....what is zero? Is it the end of the routine (similar to "Exit Sub") or is it the beginning of the routine or.......what?

 

[Joe4]

Re: Password questiion, but not a "how to crack" question.

No, zero is just the default, which is to pop-up errors as they occur.
So, it really is just shutting custom error-handling off at that point.

 

[jproffer]

Re: Password questiion, but not a "how to crack" question.

I see, I see....ok that might help tomorrow. Thank you for that.

I'm sure there are better ways than what I'll come up with, but I'd still like to try before coming and asking.

We'll see how it goes

 

[jproffer]

Re: Password questiion, but not a "how to crack" question.

Ok, this is what I came up with. Anyone see anything wrong with it? Or see a better way to do it?

If ws.ProtectContents = True Then WsProConState = True
        If ws.ProtectDrawingObjects = True Then WsProDrawState = True
        If ws.ProtectScenarios = True Then WsProScenState = True
            
            On Error Resume Next
                ws.Unprotect ""
            On Error GoTo 0
                If ws.ProtectContents Or ws.ProtectDrawingObjects Or ws.ProtectScenarios Then
                    HasPW = "Has Password"
                Else
                    HasPW = "No Password"
                End If
                
        If WsProConState = True Or WsProDrawState = True Or WsProScenState = True Then ws.Protect

 

[jproffer]

Re: Password questiion, but not a "how to crack" question.

Ok, one more question. Not exactly related to this, but kind of....

Is there a way to stop the password popup from showing? Like I said, the loading of the listbox is working great now, but I have a button to allow the user to unprotect sheets IF there is no password. If I click a sheet that has a password (which does show up in the listbox now as well) and then click the unprotect button, it shows the password dialog. I'm hoping to just have it do nothing, and not unprotect that particular sheet (because, needless to say, it can't without a password).

I've tried "EnableEvents = False" and "DisplayAlerts = False" with no luck. Is there something else I can "turn off" temporarily to kill that popup?