I have an excel file with data from A1 to A10, how would I insert a row before lets say, Row 5 ?

I have this code:
VB Code:
  1. Dim xlApp As Excel.Application
  2.     Dim wkbTemplateBook As Excel.Workbook
  3.     Dim wksTemplateSheet As Excel.Worksheet
  4.    
  5.     Set xlApp = New Excel.Application
  6.     Set wkbTemplateBook = xlApp.Workbooks.Open(Me.txtTemplate.Text)
  7.     Set wksTemplateSheet = wkbTemplateBook.Worksheets(1)
  8.    
  9.     With wksTemplateSheet
  10.         ' how to insert a row ?
  11.     End With