Sub not working when called

[tigergutt]

I have a code that works perfect when run directly, it looks like this:

Sub Protect()

    ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:= _
        False, AllowFormattingCells:=True, AllowFormattingColumns:=True, _
        AllowFormattingRows:=True, AllowSorting:=True, AllowFiltering:=True, _
        AllowUsingPivotTables:=True
End Sub

Nothing magic about that.

Now, like i said, this works as it should when i run it directly. But i have several checkboxes that generate graphs etc, and i use Call to run protect and unprotect. When calling, users can't adjust rows or columns, when rightclicking on a row most options are greyed out.
So basically it does not work as it should, and as it does when run direct.

Any suggestions?