If value in sheet 1 in cell x is ="1" then copy row from sheet 2 and replace ish

[Whaletacos]

Hello you brilliant people of the internet!
I have a smaller problem with getting vba to do what I want it to (big surprise there)

So, my task is two part, but starts roughly like this;

I have an "embedded if/and" that returns a value if two cells match. The value is from 1 to 10.

Now I need a sub to do the following;
lets say


If Range("O2") in "sheet1" is =1, then copy rows "4:4:" to "sheet1" activerow.
If Range("O2") in "sheet1" is =2, then copy rows "6:6:" to "sheet1" activerow.
If Range("O2") in "sheet1" is =3, then copy rows "7:7:" to "sheet1" activerow.

(I did not use code brackets as it isnt proper code)
Pardon for the poorly written example.
But the trick part is, that I want to copy the rows WITHOUT replacing existing data in the row. (Don't know if this is even possible)

I hope you wise people if the internet is capable to help this poor self taught vba noob.

Kind regars
WhaleTacos

 

[anglais428]

what do you mean by rows "7:7"?

If you could post a sample of your two sheets an how if O2 = 1 would look in your Sheet1