以前介紹excel保護單元格的文章已經有很多了，比如：《圖解excel鎖定單元格方法》等等。
本文介紹使用VBA代碼來進行excel保護部分單元格的方法。
我們在需要進行excel保護部分單元格的工作表標簽中，單擊右鍵，選擇“查看代碼”，打開VBE編輯器，在編輯框輸入下面的代碼：
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim b As BooLEAN
For Each c In Target '循環選定單元格
If c <> "" Then '如果單元格非空
b = True
Exit For '退出循環
End If
Next
ActiveSheet.Unprotect Password:="123" '撤消保護
If b = True Then
Target.Locked = True '鎖定單元格
ActiveSheet.Protect Password:="123" '保護工作表，密碼123
End If
End Sub
然后返回工作表中，當我們在單元格輸入數據，馬上就會對有數據內容的單元格進行保護，當我們試圖要修改編輯時，只有通過撤銷保護才能修改。
通過上面代碼實現的excel保護部分單元格，就只對有數據內容的單元格進行保護，而空單元格是不受任何保護的，也就是可以正常隨意的輸入內容。
核心關注：拓步ERP系統平臺是覆蓋了眾多的業務領域、行業應用，蘊涵了豐富的ERP管理思想，集成了ERP軟件業務管理理念，功能涉及供應鏈、成本、制造、CRM、HR等眾多業務領域的管理，全面涵蓋了企業關注ERP管理系統的核心領域，是眾多中小企業信息化建設首選的ERP管理軟件信賴品牌。
轉載請注明出處：拓步ERP資訊網http://www.lukmueng.com/
本文標題：excel保護部分單元格的方法
相關文章
