Add new line based off cell value

[bobgodfrey]

Greetings! I need a way of in vba to accomplish the below - am attaching a sample workbook where the first worksheet shows current set-up and the second worksheet shows how I need the VBA to split the data

if column bp is not null (it can contain text or int values) I need to add a new row directly under the current row.

Then in the 1st row (original) I need to remove the text in column B and H
and in the 2nd row (new) I need to remove the text in column F and K

(Any other copied values are legal to remain on both lines)