Sayfa üst bölümde işlem yasağı

[byfika]

Merhabalar,
Örnekte detaylı açıklaması yapılan, sayfanın belirleyeceğimiz üst bölümünde iş sayfa koruması dahil hiç bir işlem yapılmadan işlem yapmayı nasıl engelleriz.
Bilgiler için şimdiden teşekkürler

 

[antonio]

Merhaba,
Aşağıdaki kodu da kullanabilirsiniz
(A1:L4) bölümü için düzenlenmiştir. Kendinize göre değiştirebilirsiniz.

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, [A1:L4]) Is Nothing Then
With Application
    .EnableEvents = False
    .Undo
    .EnableEvents = True
End With
End If
End Sub

 

[byfika]

Teşekkürler

Sayın Antonio, kodlar için teşekkürler, denedim ve kod çalışmakta, Tekrar teşekkürler

 

[antonio]

Rica ederim. İyi çalışmalar.