【說明】

如何透過程式碼判斷目前活頁簿是唯讀還是讀寫,該如何撰寫程式碼呢?以下分享

 

【程序碼】

1.寫入程序後,觸發程式碼,就出現對話視窗告知目前狀態

 

常用程式碼系列26-如何判斷目前是否為唯讀檔.png

 

2.輸入以下程式碼

Sub 如何判斷目前是否為唯讀檔()

 If ActiveWorkbook.ReadOnly = True Then

   MsgBox "唯讀"

   Else

   MsgBox "讀寫"

 End If

End Sub

 

【程序碼解說】

Sub 如何判斷目前是否為唯讀檔()

If ActiveWorkbook.ReadOnly = True物件屬性ReadOnly,若是True((唯讀會回傳True、反之則回傳False)

   MsgBox "唯讀" 則跳出訊息視窗,顯示唯讀

   Else 若不是

   MsgBox "讀寫" 則跳出訊息視窗,顯示讀寫

 End If

End Sub

 

謝謝您閱讀了我的文章,若您喜歡我的文章,希望您幫我按個「」,也幫忙分享給需要的朋友或其他平台,謝謝。
 
 
20180128 黑.png

arrow
arrow
    創作者介紹
    創作者 黑天使 的頭像
    黑天使

    問問蓮蓬頭

    黑天使 發表在 痞客邦 留言(0) 人氣()