Create new rows based on part of the value in a cell

I would like to create a new row based on the value contained within a cell - add that value to the last column.
Example
Test 1 1, 2, 3, 4, 5

The macro should create
Test 1 1
Test 1 2
Test 1 3
Test 1 4
Test 1 5

Thanks for your help!

VJB