learn,
This code should do the trick but you should only run it once or there will be multiple pp's inserted.
I assumed that you wanted the Salespersons name left in and I put the sheet name before with a space. Modify the code for your needs.
Regards
Weasel
Sub myMacro()
Dim shtName As Variant
shtName = ActiveSheet.Name
Range(("b2"), Range("b2").End(xlDown)).Select
For Each cell In Selection
cell.Value = shtName & " " & cell.Value
Next
End Sub
Edit: Did not open attatchment, and did not realise you wanted a new col inserted. What I have given you will place pp in the same cell as Salesperson NOT in a cell on its own :smash: