inserting row in excel

I'm using vb.net express to call excel with this code

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click

Dim XL As Excel.Application

Dim xlwb As Excel.Workbook

Dim xlsheet As Excel.Worksheet

XL = New Excel.Application

xlwb = XL.Workbooks.Open("C:\Documents and Settings\S. Ross\My Documents\sales invoice1.xls")

XL.Visible = False

Try

XL.Selection.value = Me.NameComboBox.Text.ToString

XL.Selection.value = Me.AddressTextBox.Text.ToString

XL.Selection.value = (Me.CityTextBox.Text.ToString)

XL.Selection.value = (Me.StateTextBox.Text.ToString)

XL.Selection.value = Me.ZipTextBox.Text.ToString

XL.Selection.value = Me.InvoiceIDTextBox.Text.ToString

XL.Selection.value = Me.CustomerIDTextBox.Text.ToString

Catch ex As Exception

End Try

Try

Dim iddatatables As DataTable = Me.RCSDataSet.InvoiceDetails

Dim idx As Integer = 1

For idx = 0 To iddatatables.Columns.Count - 1

Next

Dim row As DataRow

Dim rowidx As Integer = 15

For Each row In iddatatables.Rows

For idx = 0 To iddatatables.Columns.Count - 1

Next

Next

Catch

End Try

xlsheet = Nothing

xlwb = Nothing

XL = Nothing

End Sub

This prints the required invoice but only to row 36 on the excel worksheet, if I have more than 36 rows to print I need to be able to insert the rows at row 36 and push the rest of the rows down

Hi

In VBA the command would be

Selection.Insert Shift:=xlDown

assuming that the currently selected row is the insertion point

Thanks,

Will post in the visual basic language forum to see if anyone knows how to accomplish this with vb.net.