VBa code to delete column data and resize table

Hello friends,

have a workbook which has 2 worksheets.
1 is called "Packing List" and the other "Data".

Now in Sheet Packing List have used formulas in column B, C, D to fetch data from sheet Data based on the value in ColumnA.

Now would like to create a macro that will delete the data from column A in sheet "packing List", and resize the table as well.

Please note that formula in column B,C and D should not be deleted atleast for row2,

Also the data can be more that 100 rows, cant tell exact figure now.

Any help on the same please??

Regards