veri girişi yapıyorum, aynı satıra rakamsal olarak değer giriyorum.

örneğin;F 10 satırına rakamsal olarak 10 girdim. sonra üzerine hesap makinesi ile 15 ekleyip 25 yazıyorum. sormak istediğim 10 yazan satırın uzerıne +15 yazıp entera basınca satırı ototamatık olarak duzenleyen sonucu 25 olarak satırda gösterecek bır formul varmı ?


 

hücre değeri 10'ken yanına +15 yazınca sonucu 25 göstermesini istiyorsan hücrenin başına da + işareti koy, yani alttaki gibi olsun.

ilk hali : 10
ekleme sonrası : +10+15

cakabo

sanırım arkadaş başka bişeyden bahsediyor bende uğraştım ama olmadı. bir seferlik değil her hücreye girilen yeni değeri mevcut değere eklesin istiyor.

gostak

@gostak doğru söyledin tam istediğim o aynen.

Bysb

Alttaki kod A1 hücresine girilen değeri toplayacak şekilde düzenlenmiştir.
Farklı bir hücre istiyorsan kodun içinde A1 yazan yeri değiştirebilirsin.

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Static Topla As Double
If Target.Address(False, False) = "A1" Then
If Not IsEmpty(Target.Value) And IsNumeric(Target.Value) Then
Topla = Topla + Target.Value
Else
Topla = 0
End If
Application.EnableEvents = False
Target.Value = Topla
Application.EnableEvents = True
End If
End Sub

cakabo
1

mobil görünümden çık