سلام
شاید برای کسی پیش اومده باشه در یک فایل اکسل زمانی که شیت های اون قفل هستن کد ران میشه اما وقتی اون فایل رو برای استفاده چند کاربر شیر میکنن اون کد ران نمیشه
این نحوه کد میتونه تو فایل های شیر شده باشیت های قفل شده استفاده شه
شاید برای کسی پیش اومده باشه در یک فایل اکسل زمانی که شیت های اون قفل هستن کد ران میشه اما وقتی اون فایل رو برای استفاده چند کاربر شیر میکنن اون کد ران نمیشه
این نحوه کد میتونه تو فایل های شیر شده باشیت های قفل شده استفاده شه
کد PHP:
Sub a()ActiveWorkbook.UnprotectSharing SharingPassword:="123"Application.DisplayAlerts = TrueActiveSheet.Unprotect "123"ActiveSheet.ShowAllDataActiveSheet.Protect "123", DrawingObjects:=True, Contents:=True, Scenarios:=True, AllowFiltering:=TrueActiveWorkbook.ProtectSharing Password:="123", SharingPassword:="123"End Sub