Ctrl X Kullanımını Engelleme

[baydeniro]

Arkadaşlar merhaba. Hiç başınıza geldi mi bilmiyorum; yaptığınız dosyaları özellikle başkaları kullandığında bir hücreyi bir alt hücreye KOPYALAMA yapmak için yanlışlıkla Ctrl C yerine Ctrl X kullanıldığı zamanlar olur. Bu durumda da Ctrl X yapılan hücreye bağlı formüller zarar görür. Örnek bir dosyayı ekledim. Ctrl X yapılmasını ENGELLEMENİN bir yolu var mı ?

 

[Levent Menteşoğlu]

Aşağıdaki kodu sayfanın kod sayfasına kopyalayın.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Application.CutCopyMode = xlCut Then Application.CutCopyMode = False
End Sub

 

[baydeniro]

Teşekkür

Sayın Leventm BUYUKSUN hocam.