[سوال] قفل شدن شیت با امکان سورت و فیلتر

[eppagh]

این کد رو از روی ماکروی خود اکسل برداشتم و دادم تا وقتی شیت قفل شد امکان استفاده از فیلتر و سورت باشه ولی این دو امکان بسته می مونه.

کد php:

ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True, _
        AllowSorting:=True, AllowFiltering:=True
    ActiveSheet.EnableSelection = xlNoRestrictions
    ActiveSheet.Protect Password:=PassKey 


چه کار باید کرد؟