【Excel VBA】 判斷檔案是否唯讀

用途:判斷目前開啟檔案是否唯讀狀態,

判斷EXCEL檔案是否更新與寫入資料

Sub Check_ReadOnly()
'--判斷檔案是否唯讀'
    If ActiveWorkbook.ReadOnly = True Then
        MsgBox "唯讀"
    Else
        MsgBox "讀寫"
    End If
End Sub