Insert a formula in a Table via VBA

[Xalova]

Hey, So i have just posted a thread about how to insert a formula via VBA in the desired column of my Table. The answer i got worked perfectly fine. But as soon as i wanted to replace the original formula with my formula it stopped working and i guess i know why.

the code which originally worked is as follows:

        Sub Xalova()
Dim myTbl As ListObject
Set myTbl = ActiveSheet.ListObjects("Teilbedarf")
myTbl.DataBodyRange.Cells(1, myTbl.ListColumns("Benennung").Index).Formula = "=SUM(G7:G26)"
End Sub

now i want to replace the

=SUM(G7:G26)

with

=[@Normteil]&" "&[@Norm]&IF(SUMPRODUCT(--([@Normteil]=Schraubenklassen))>0,"x"&[@Abmaße],"")

i guess it doesnt work because of the custom "text" added in the formula which is sepereated by the ".

what could a solution for this be?

 

[Xalova]

In that case you need to add this line before you try to input the formula

    myTbl.ListRows.Add

Thank. You.

Finally it is working as intended. What a long process. Thank you for staying with me...! Very much appreciated

 

[Fluff]

You're welcome & thanks for the feedback.