Memprotec semua cell yang mengandung formula - belajar VBA Excel

Untuk mengamankan rumus rumus atau formula kita perlu mengunci cell cell yang mengandung formula

Memprotec semua cell yang mengandung formula kode nya :

Sub lock_Cells_WithFormulas()

With ActiveSheet

.Unprotect

.Cells.Locked = False

.Cells.SpecialCells(xlCellTypeFormulas).Locked = True

.Protect AllowDeletingRows:=True

End With

End Sub