Loop through rows, insert sheet for each and copy header with row to new sheet

Hi all,

I have a bit of a project I have been tasked with as I am the only one with the vba experience needed. I have been able to play with various areas of what I need up to now but am stuck with this part of the task.

I have a set of data that shows results for a list of individuals. We want to extract the data for each individual and forward to them. When it comes to it, I can sort the 'sending to them' part as have done that previously. My issue is pulling the individuals data from the main sheet and pasting into individual sheets. I so far have the following which correctly creates and names a sheet per row:

Please Login or Register  to view this content.

Is anyone able to help with getting the head and relevant row copied across to the new relevant sheet?

My eventual requirement is to take the fields and populate a pre-set template!

many thanks