Thông báo Sheet có được bảo vệ không ??

[Mr Okebab]

Sẳn đây cho hỏi: Trong Excel có hàm nào xác định dc tình trạng Protect của sheet ko? Đại khái sẽ cho giá trị TRUE nếu sheet dc Protect và ngược lại!
ANH TUẤN

http://tinyurl.com/2e3lyw

Bác xem nhé :

Function Pro(Optional Sh As String) As Boolean
    If Sh = "" Then
        Pro = ActiveSheet.ProtectContents
    Else
        Pro = Sheets(Sh).ProtectContents
    End If
End Function

File VD:

Thân!