Tables not updating my formula - may be a VBA issue

[tbrynard01]

I have a table where I insert a line and then copy and paste the previous line as a value as the data is being fed to the table from another worksheet.

I use this code but can't figure out my error as I've updated the formulas in the table yet when I insert a line it's not keeping the updates, it reverts back to the old formulas?

This is the code that I'm using:

Dim n As Long
With ActiveSheet.ListObjects("Table927")
.ListRows.Add AlwaysInsert:=True
n = .DataBodyRange.Rows.Count
.ListRows(n - 1).Range.Copy
.ListRows(n - 1).Range.PasteSpecial xlValues
End With
Application.CutCopyMode = False

 

[GlennUK]

Can you please step through the code, while watching the sheet, and see if the code is doing what you think it is doing?

 

[sandy666]

is that what you want?
View attachment 3762
and 2nd question: it must be a vba?

 

[tbrynard01]

Can you please step through the code, while watching the sheet, and see if the code is doing what you think it is doing?

I think I got it figured out. Fingers crossed!

Thanks.

 

[tbrynard01]

is that what you want?
View attachment 3762
and 2nd question: it must be a vba?

I think I got it figured out. Fingers crossed!

Thanks.