Open workbook, insert copied rows VBA code

Hey VBA FTW,

When a book is just opened, nothing is selected - if you want to copy the sheet that opens, you could write:

Cells.Copy

and you could write:

Rows("4:4").Insert Shift:=xlDown

instead of:

Rows("4:4").Select
    Selection.Insert Shift:=xlDown

instead of:

Selection.Copy