The previous one (.InsertAfter "***" & vbCr & "***" &nbsp gave me a sequence : *** Pb ***, and it worked except for bigger paragraphs where I had to rerun the macro to get the result. I don't have use for the first three asterisks, it suffices to me to have the paragraph marked at the beginning, but they are not a problem either, that part goes with the original text which is cut out.

The revised code (.InsertAfter vbCr & "*** " & vbCr) inserts a sequence Pb *** Pb and this one does it perfectly, and at one go, whatever the length of the paragraph. This one actually does what I asked for, but I have a problem of different kind now. To conveniently move to the next paragraph, I've created a keyboard shortcut using autohotkey which places the cursor after the paragraph break (CTRL+DOWN ARROW places it at the beginning of the next paragraph and that doesn't suit me so I made a combination of Word shortcuts to place the insertion point in between the paragraphs, and added a code from the net to change the text color to red), so that the other paragraph break in the sequence PB *** PB is a problem. Is it possible to change it so the second paragraph break is left out and I get PB*** inserted instead. That would be pitch perfect for my purposes, and a great time-saver. Thanks for the help again macropod.