VBA Selecting all bold rows and inserting a copied row under it

What really do you want to get? You could upload small sample to show disired result.
Lets say row 2 ir "1234"
Column A looks like:
Text1
Text2
Text3
Text4

After you run your code result might be ... ?

Start would be this:

HI
Copy this
that
is
a
test
Whats
up
Hello


result should be like this:
Unbenannt.PNG

So each time there's a bold row it should copy the 2nd Row down there and shift the rest down.

You make it too complicate, I think.
If you need find rows with text in bold, so search just in one column (if all values in a row is in bold, so value in column A also should be in bold).
Insert your value from row 2 just after bold row is found.
Try this.

Please Login or Register  to view this content.

Hi kasan, thanks for your help. Excuse me, I did not get it right.
The macro can search just in column A, because i have nothing else bold there. BUT it should copy all Titles from A:K . Have a look at (a better) example: (The example one is only from A:C, I need it from A:K)
Unbenannt.PNG

If I modify the code to choose A:K it doesn't work anymore.

Hmm, and those Title1, Title2.. you insert with other macro, right?
Why don't you insert titles Name, Address, Country just after you manage Title1?

I didn't manage to do that. I used this code to create the titles:

Please Login or Register  to view this content.

What about this

Please Login or Register  to view this content.

Probably

Please Login or Register  to view this content.

Test it and if necessary play with that i+2 (may be i+1 will give you correct result)

Thx, never thought of writing this directly into the same code.. It works perfectly with

Please Login or Register  to view this content.

as you said