Optellen vanuit 1 invoerveld

[KelvinC]

Hallo,

Ik ben nieuw op dit forum. Ik heb net alles doorzocht, maar kon niet echt het antwoord vinden op mijn vraag. Mijn vraag is als volgt.
Ik wil graag bedragen optellen die ik in 1 invulveld invul. B.V. in Cel A1 vul ik 100 in. Dan is mijn totaal in C1 100, maar daarna vul ik in A1 200 in dan wordt mijn totaal in C1 300.
Dus de waaarde in A1 moet overschrijfbaar zijn maar wel telkens in C1 opgeteld worden.
Ik denk dat dit via een macro moet of zoiets, maar ik kom er niet uit, graag zou ik jullie hulp hierbij krijgen.

Alvast heel erg bedankt.
KelvinC

 

[Niels28]

R.muisknop op tabbladnaam => programmacode weergeven
en de volgende macro erin plakken.

Nadeel is dat je geen enkele controle hebt over wat je hebt ingevoerd.

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("a1")) Is Nothing Then
[c1].Value = [c1].Value + [A1].Value
End If
End Sub

Niels

 

[Ad Becude]

KelvinC,
Hier moet het mee lukken.

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
Range("C1") = Range("C1") + Target
End If
End Sub

 

[KelvinC]

bedankt voor de reacties ik ga het morgen gelijk proberen.

 

[KelvinC]

Super het werkt

Bedankt!!

 

[Niels28]

Zet je de vraag dan op opgelost.

Niels