I'm currently using this Macro to add a row into a sheet:

Sub AddARow()
Dim varUserInput As Variant
varUserInput = InputBox("Enter Row Number where you want to add a row:", _
"What Row?")
If varUserInput = "" Then Exit Sub

RowNum = varUserInput
Rows(RowNum & ":" & RowNum).Insert Shift:=xlDown
Rows(RowNum - 1 & ":" & RowNum - 1).Copy Range("C" & RowNum)
Range(RowNum & ":" & RowNum).ClearContents
End Sub

I actually need the macro to add a defined area "reciperow" into the sheet at the inputted rownum and start at column c. Anyone help me out on this?