hücredeki rakamın sabit kalması

[zamenya]

arkadaşlar merhaba

b2 hücresine girilen her verinin a1 hücresinde üzerine eklemesini nasıl sağlaya biliriz

 

[halit3]

bu kodu denermisiniz.

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Column = 2 Then
If Target.Row = 2 Then
Cells(1, 1).Value = Cells(1, 1).Value + Cells(2, 2).Value
Worksheets(ActiveSheet.Name).Cells(Target.Row, 2).Select
End If
End If
End Sub

 

[zamenya]

Sayın halit3 yardımınız için çok teşekkürler