Hücreye yeni değer girildiğinde başka hücre değeri değişsin

[tanayhan]

Selam Arkadaşlar,
Çok uğraştım ama yapamadım. İki sayfam var. Sayfa1 de AQ13 hücresine her yeni değer girişimde Sayfa2 deki R23 hücresinin değeri otomatik olarak 0 olsun istiyorum. Yardıma gereksinim duyuyorum.
Teşekkürler

 

[Orion1]

Çalışma sayfasının kod bölümüne aşağıdaki kodları yapıştırınız.

Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Intersect(Target, [AQ13]) Is Nothing Then Exit Sub
Sheets("Sayfa2").Range("R23").Value = 0
End Sub

 

[tanayhan]

Çok sağolun Sn. Evren Gizlen.

 

[Orion1]

Çok sağolun Sn. Evren Gizlen.

Rica ederim.
İyi çalışmalar.