updatin totals in exc el via inputlist

Coen,
Place this code in the sheet you are using ....

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
      With Target
         If .Address(False, False) = "C2" Then
            If IsNumeric(.Value) Then
               Application.EnableEvents = False
               Range("B2").Value = Range("B2").Value + .Value
               Application.EnableEvents = True
            End If
         End If
      End With
    End Sub

See if that works for you