To insert a row use the following code. The row is inserted above the range specified.
VB Code:
Range("A5").EntireRow.Insert xlShiftDown
To add headers and footer you should use the PageSetup object of the WorkSheet.
e.g.
VB Code:
Worksheets("Sheet1").PageSetup.LeftHeader = "Finance Report 1"
Other properties of the PageSetup object include the CenterHeader, RightHeader, LeftFooter, etc.
You should also look in the VBA help files for the special Formating Codes used in Headers and Footers e.g. &D = Print Date