tilføj værdier i tabel indtastet fra samme celle

Hvorfor skriver du bare ikke i celle A2-A4 ?

så har jeg kun et indtastningsfelt.
En funktion jeg også kan bruge i andre sammenhæng

Du kan evt. få vba til at lave en pop up med spørgsmålet om værdi 1, værdi 2 og værdi 3 efter hinanden, men du kan ikke gøre det hensigtsmæssigt hvis du vil have den til at registrere forskellige værdier tastet i samme celle.

Hvis du ikke blot vil skrive i A2 til A4 kan du evt. bruge denne makro. Lav en separat makro til at slette cellerne.

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A1")) Is Nothing Then
If Range("A2") = "" And Range("A3") = "" And Range("A4") = "" Then
Range("A2") = Target
Else
If Range("A2") <> "" And Range("A3") = "" And Range("A4") = "" Then
Range("A3") = Target
Else
If Range("A2") <> "" And Range("A3") <> "" And Range("A4") = "" Then
Range("A4") = Target
Range("A5") = WorksheetFunction.Sum(Range("A2:A4"))
Else
If Range("A2") <> "" And Range("A3") <> "" And Range("A4") <> "" Then
MsgBox ("Slet A2:A5")
End If
End If
End If
End If
End If
End Sub

Det er en stor hjælp :-), men ved ikke lige hvordan jeg skal C/P den i listen. Når jeg C/P den du har skrevet, så siger den fejl.  :-(

Højreklik på fanebladet og sæt den ind under Vis Koder