A1 hücresi değiştiğinde makro çalışsın

[kan-nas]

Selamlar,

Sayda 1 deki A1 hücresi değiştiğinde makronun çalışması için gerekli kod nedir. Ya da Private Sub dan sonra ne yazmalıyım. Range("a1")_change yazdım olmadı.

Birde Sayfa1 deki herhangi bir hücre değişirse makro çalışsın. Bunuda yazabilir misimiz.?

İyi çalışmalar..

 

[N.Ziya Hiçdurmaz]

yanıt

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [a1]) Is Nothing Then Exit Sub
MsgBox "Deneme"
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
MsgBox "Deneme"
End Sub

 

[Seyit Tiken]

Alternatif :

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then MsgBox "Test"
End Sub