پرسش قفل زمان دار سلول یا صفحه

[mohammad_kh99]

با سلام آیا می توان یک سلول یا یک شیت را به صورت زمان دار قفل نمود.
مثلا با رسیدن یک تاریخ خاص یا بعد از گذشتن چند روز خاص به صورت خودکار قفل گردد.

[iranweld]

با سلام

در قسمت کد نویسی اکسل در this workbook این کد را قرار دهید

Private Sub Workbook_Open()

If TODAY() >= "04/11/2016" Then

Sheet2.Protect Password = "abcd"

MsgBox "sheet2.protected "

End If

End Sub 

[generalsamad]

با سلام
با اجازه دوست عزیز جناب iranweld
اگه کد بالا با خطا مواجه شد کافیست هنگام تعریف شرط به جای today از date استفاده بشه

Private Sub Workbook_Open()
    If Date >= "11/04/2016" Then
        Sheet2.Protect Password = "abcd"
        MsgBox "sheet2.protected "
    End If
End Sub