یه مشکل برام پیش اومده خیلیم هم تو نت گشتم ولی حل نشد امیدوارم اساتید بتونن کمک کنند
من یه فایل تو شبکه شیر کردم که شیتهای اون protect شده اند و وقتی که شیت رو PROTECT میکنی ShowAllData هم کار نمیکنه از کدهای زیر هم استفاده کردم جواب نداد ممنون میشم اساتید راهنمایی کنند چطور یه فایل که شیر شده و هم پروتکت شده رو حذف فیلتر کرد
ActiveWorkbook.UnprotectSharing
ActiveSheet.Unprotect "123"
ActiveSheet.ShowAllData
ActiveSheet.Protect "123", DrawingObjects:=True, Contents:=True, Scenarios:=True, AllowFiltering:=True
ActiveWorkbook.ProtectSharing


نمی دونم خیلی خیلی بعیده که تو اون لحظه کاربری فایل رو لود کنه!!!!! 
کامنت