VBA to copy "N" rows and insert above copied rows

[Dan88]

Hello, i have to do this manual copy and paste existing data daily and update the date to today.
Is there a VBA that can ask me how many rows to copy within range and paste it above the copied data?

For instance i need to copy A11:K11 daily and insert above the copied data so the newest date will always show on A11.

i've tried this but it wont do what i need it to.. any help would be greatly appreciated.

Sub copy()
'Get Row number from user
myRow = Application.InputBox _
("Please Enter A Row Number For The Insertion", _
"Row Number Input", Type:=1)
'Quit if Cancelled
If myRow = False Then Exit Sub
'Copy Range on ActiveSheet
ActiveSheet.Rows("2:11").Copy
'Insert at Row entered by user
Rows(myRow).Insert


End Sub

 

[Dan88]

Bump. Hi community, can any please offer some assistance or pointers to my code above?

Thanks