VBA Copy and Paste Rows if Condition is Met

Hi, I have the following spreadsheet (see attached), I want to be able to produce two new rows after every row which contains the word "Principal" in Column B. Furthermore, I would like the two new rows to contain the same information as the row preceding the row which contains word "Principal", based on the condition if the row preceding the row contains the word "Principal" has the word "General" in column B, if it does not then I would like the two new rows to be blank.

Is there a way to do this in VBA, i.e. via a loop

Anyone's advice would be very much appreciated!

Because your file is many rows long, I would urge you to test this on a smaller sample to ensure that I have understood your needs properly before applying to the full worksheet. I tested on a smaller version of your file (~25 lines)

Please Login or Register  to view this content.