Tek hücrede veri ve formulü aynı anda kullanmak

[cuno81]

Herkese kolay gelsin sorum şöyle

a1 hücresine 10 girdiğimde otomatik olarak c1 ile toplasın nasıl yapabilirim

 

[apocalyt]

sayfanın ismine sağ klik yapıp kod görüntüle diyin..açılan sayfaya aşağıdaki kodu kopyalayın..a hücresine 10 girdiğinizde otomatik olarak c1 hücresi ile topayacaktır.

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("a1")) Is Nothing Then Exit Sub
If Target.Value = 10 Then
Target.Value = Target.Value + Range("c1").Value
End If
End Sub