Userform paste to table error

Hi,

I have a table on an Excel sheet that I use for adding and tracking expense payments.

Two of the table columns have a function above the header column to sum the column ("J4")
=SUBTOTAL(9,J6:J1048576)

I have created a userform which would allow me to add data to the next available empty row.
This code is

Dim LastRow as Long
Set ws = Sheets("Expenses")
LastRow = ws.Range("A" & Rows.Count.End(xlUp).Row + 1
ws.Range("J" & LastRow).value = DEBITTEXTBOX.value

The userform includes textboxes formatted for UK currency input with before and after update event coding

The problem I am encountering is that on running the Save code, while the "values" are saved into the correct column, the entered amount does not change the value in J4.

Any help would be greatly appreciated.