Failed procedure call

[stubarny]

Hello,

I have a procedure that is breaking on the line below:

Call unprotect_visible_worksheets

The error message is:

"Compile error:

Sub or Function not defined"

However the target procedure is in another module within the same project as below:

Private Sub unprotect_visible_worksheets()
         Call public_variables
         Application.ScreenUpdating = False
         For Each wSheet In Worksheets
             wSheet.Unprotect Password:=protection_password
         Next wSheet
         Application.ScreenUpdating = True
End Sub

It appears that I am being told that I haven't created a module that I am targetting, but I am sure I have done so. Please could somebody help?

Thanks,

Stu

 

[doofusboy]

Try changing this:

Private Sub unprotect_visible_worksheets()


To this:

Public Sub unprotect_visible_worksheets()

 

[stubarny]

Thanks doofusboy