Insert Row For Missing Number In List

We recently bought some new software at work, and I'm having trouble formatting the exported data in a way that will work with existing reports. The attached file is what the data looks like after being exported. Basically, what I'm trying to do is insert rows for the missing numbers -- i.e., each name should be followed by rows numbered 1 through 10.

John Smith John Smith
1 1
4 2
8 3
4
5
6
7
8
9
10

My ultimate end goal is to have columns of data for each name, instead of rows:

John Smith 1 2 3 4 5 6 7 8 9 10

I've created a formula that can do that part, but it operates on the assumption that each name will be followed by a set number of rows.

What little I know about vba I've learned on my own, so I may just be missing something obvious.