文章介紹使用VBA來實現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保護部分單元格,就只對有數據內容的單元格進行保護,而空單元格是不受任何保護的,也就是可以正常隨意的輸入內容。