Mouse'un sağ tık menüsüne makro atanabilir mi?

[bezl]

Formüllerin olduğu bir sayfayı korumaya aldım ancak bir hücreyi korumadan kaldırmak içni sağ tıka "koruma kaldır" ekleyip buna bir makro atamak istiyorum. Yardımcı olursanız sevirinim. Ekleyeceğim kodda şu:

Sub kaldir()
    ActiveSheet.Unprotect
    ActiveCell.Select
    Selection.Locked = False
    Selection.FormulaHidden = False
    ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
End Sub

 

[Ali]

Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)

..... Kodları buraya yazın

End Sub