Refer to cell location in table and insert related formula in cell location

I am trying to preserve formulas in tables in case they are unintentionally overwritten / deleted. I have two tables. The first table is a list of all formulas used in all tables in the workbook. Tbl_A has two columns. Tbl_A Column1 has the range that the formula relates to (ex. Tbl_B.DataBodyRange.Cells(1, 2) .) Tbl_A Column2 has the formula that should be used for Tbl_B.DataBodyRange.Cells(1, 2) entered as text (first character in formula is '). I simply want the code to loop through all Tbl_A Column1 cells, and use the location from that cell to go to the location that it refers to and insert the formula from Tbl_A Column1.Offset(0, 1). I have tried using

Please Login or Register  to view this content.

instead of

Please Login or Register  to view this content.

, but it throws a Run time error '424' Object Required.

I cannot use absolute cell references as the tables can be moved from one area of the worksheet to another. Any help greatly appreciated. Sample file attached.

Please Login or Register  to view this content.

Capture.JPG

Capture1.JPG

Capture2.JPG

Please Login or Register  to view this content.

You're welcome. Thanks for the feedback.

You could make it a little shorter with this. It's not really using the references in column 1 of Table A

Please Login or Register  to view this content.