Optellen in kolommen

[anciano]

Hi misschien is deze al voorbij gekomen, maar ik kan het even niet vinden!

Ik heb twee kolommen: 1 op een bedrag in te voeren en de tweede om het totaal bedrag te zien.
Nu wil ik steeds in de eerste kolom een nieuw bedrag invoeren en moet dit worden opgeteld bij het totaal bedrag!
Voorbeeld: ik begin met 10 euro nu zie je in de tweede kolom 10 euro. Nu overschrijf (opnieuw invoeren) de eerste kolom met 10 euro, nu wil ik dat in de tweede kolom 20 euro te zien is. Graag deze formule?
Hartelijk bedankt.

 

[Thankyou]

Dit gaat niet via een formule, wel via VBA. Heb ooit dit stukje geleend, telt alle invoer van A1 op in B1

Private Sub Worksheet_Change(ByVal Target As Range)
 If Not Intersect(Target, Range("A1")) Is Nothing Then
  Range("B1") = Range("B1") + Range("A1")
   Range("A1").ClearContents
End If
End Sub

Succes,

 

[anciano]

Hoi Martin,

Perfect! Precies wat ik nodig. Hartelijk bedankt voor deze snelle oplossing
Gr.

 

[Thankyou]

Wil je dan alleen nog even de vraag op opgelost/afgehandeld zetten?

Bedankt,