VBA / copy & insert rows with specific columns depending on cell value

Hello,

I was trying to figure out how to do the following:

For each row:
1. Scan for the integer value found under column "I" on "Worksheet" (titled rows to duplicate).
2. Copy that row (with specific columns - highlighted in yellow)
3. Go to other sheet, insert rows to match the integer value
4. Paste copied row to inserted rows
5. Apply all borders
Repeat for next row

Here's the code for the attached worksheet. I was trying to get it to work but it is a bit clunky. Can anyone help out?

Please Login or Register  to view this content.

Result in Sheet Test

Please Login or Register  to view this content.

Kind regards
Leo

That worked great, thanks a lot for you time.