formül olan hücreyi koruma

[alisantr]

formül yazılan hücreyi korumak istiyorum. onun üzerinde değişiklik yapılamasın ve formül silinmesin..yardımcı olursanız

 

[bedersu]

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
If Target.HasFormula Then
Application.OnKey "{del}", ""
Application.OnKey "{BACKSPACE}", ""

Else
Application.OnKey "{del}"
Application.OnKey "{BACKSPACE}"
End If

End Sub

Private Sub Workbook_WindowDeactivate(ByVal Wn As Window)
Application.OnKey "{del}"
Application.OnKey "{BACKSPACE}"
End Sub

 

[altanson]

Makro kullanmadan formül olan hücreler nasıl korunabilir??

 

[Ali]

Makro kullanmadan formül olan hücreler nasıl korunabilir??

http://www.excel.web.tr/showthread.php?t=38312

Tüm sayfayı seçersin ve sağ tuş-Hücre biçimlendir-Koruma kısmından Kilit kısmındaki onayı kaldırıp tamam deyip çıkarsınız.Sonra yine tam sayfayı seçersiniz.CTRL+G tuşuna basarsınız-Özel-Formüller kısmını seçersiniz tamam deyip çıkarsınız sadece formül olan hücreleri seçmiş oldunuz.Şimdi
sağ tuş-Hücre biçimlendir-Koruma kısmından Kilit kısmını onaylayın ve Araçlar-Koruma-Sayfayı koru seçeneğinden bir şifre verip sayfayı koruyunuz.

 

[N.Ziya Hiçdurmaz]

yanıt

Resimleri takip ediniz.

 

[worldda]

sayın bedersu ;

verdiğiniz kodu yazdım backspace ve del tuşları için çalışmakta.ancak f2 tuşu ile formül değiştirilebiliyor space veya herhangi bir başka tuş ile de silinebiliyor.bu kodu tüm klavye için nasıl geliştirebiliriz veya bunun başka bir yolu bir varmı ?

yardımlarınız için şimdiden teşekkürler.

cevapları gördüm teşekkürler

 

[altanson]

Sn. Ali, Sn. V.Basic For Applications;

Cevaplarınız için teşekkürler.

 

[hakanakbey06]

çözüm için teşekkürler

http://www.excel.web.tr/showthread.php?t=38312

ali arkadaşın yazdığını aynı şekilde yapın ve çözüme kavuşun, ben yaptım ve oldu. teşekkür ederim.