Worksheet_Change (Aksiyon Bazlı Makrolar)

Event (Olay) Mimarisi

Bu kodlar standart Modüllere değil, ilgili sayfanın (Örn: Sayfa1) kod bölümüne yazılmak zorundadır.

VBA Kodu:

Private Sub Worksheet_Change(ByVal Target As Range)
    ' Eğer değişen hücre A1 ise
    If Not Intersect(Target, Range("A1")) Is Nothing Then
        MsgBox "A1 hücresini değiştirdiniz!"
    End If
End Sub

Ne Göreceksiniz? Kullanıcı ne zaman A1 hücresine bir veri girip Enter'a bassa, makro kendiliğinden uyanıp uyarı verecektir.