Excel Macro auto filter copy paste loop between two tables loops forever and returns blank cells

Question

As a preface, I stuck these codes together and have only a very basic idea of how they work.

I made a Macro to autofilter a table (It data[Surname]) and return based on t