» Cell protection only for formulas using VBA in Microsoft Excel
CATEGORY - Protecting in VBA
VERSION - All Microsoft Excel Versions
Question: Only cells with formulas are to be protected. New entries are recognized and also protected.
Answer:
Insert the following code in This Workbook module.
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim rng As Range
For Each rng In Target.Cells
If rng.HasFormula Then
ActiveSheet.Protect
Exit Sub
Else
ActiveSheet.Unprotect
End If
Next rng
End Sub
Book Store:
No comments have been submitted.
