سلام
شاید برای کسی پیش اومده باشه در یک فایل اکسل زمانی که شیت های اون قفل هستن کد ران میشه اما وقتی اون فایل رو برای استفاده چند کاربر شیر میکنن اون کد ران نمیشه
این نحوه کد میتونه تو فایل های شیر شده باشیت های قفل شده استفاده شه
کد 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
 |
اخطار: این یک موضوع قدیمی است
به دلیل قدیمی بودن موضوع، ممکن است برخی فایل های ضمیمه به درستی کار نکنند. لطفا در صورت عدم ضرورت، از بالا آوردن موضوعات قدیمی خودداری نمایید. |
|
پاسخ با نقل قول
علاقه مندی ها (Bookmarks)