Dodanie tekstu przed wyeksportowaną tabelą z DataGridView do worda (.rtf) vb.net

Question

Cześć. Znalazłem kod, który po przerobieniu działa w taki sposób, że eksportuje zawartość tabeli w GridDataView do worda (w formacie .rtf). Kod:

        Dim objDoc As Microsoft.Office.Interop.Word.Document
        Dim objword As Microsoft.Office.Interop.Word.Application

        objword = CreateObject("Word.Application")
        objword.Visible = True
        objDoc = objword.Documents.Add

        Dim _RowCount As Integer = DataGridView1.Rows.Count - 2
        Dim _ColCount As Integer = DataGridView1.Columns.Count - 1

        Dim ht1 As Microsoft.Office.Interop.Word.Table

        ht1 = objDoc.Tables.Add(objDoc.Bookmarks.Item("\endofdoc").Range, _RowCount + 1, _ColCount + 1)
        ht1.Borders.OutsideColor = Microsoft.Office.Interop.Word.WdColor.wdColorBlack
        ht1.Borders.OutsideLineStyle = Microsoft.Office.Interop.Word.WdLineStyle.wdLineStyleSingle
        ht1.Borders.InsideColor = Microsoft.Office.Interop.Word.WdColor.wdColorBlack
        ht1.Borders.InsideLineStyle = Microsoft.Office.Interop.Word.WdLineStyle.wdLineStyleSingle


        For i As Integer = 0 To _RowCount
            For _col As Integer = 0 To _ColCount
                Dim colType As Type = DataGridView1.Columns(_col).GetType
                If colType.Name = "DataGridViewImageColumn" Then
                    ' Dim _image As Image = DirectCast(DataGridView1.Rows(i).Cells(_col).Value, Image)
                    'Clipboard.SetImage(_image)
                    'ht1.Cell(i + 1, _col + 1).Range.Paste()
                Else
                    ht1.Cell(i + 1, _col + 1).Range.Text = CStr(DataGridView1.Rows(i).Cells(_col).Value)
                    'ht1.Cell(n, m).Range.Text = CStr("dsdasdadadggg")
                End If
            Next
        Next

        objDoc.SaveAs2("C:\Plik5.rtf")

Jednak nie wiem w jaki sposób mogę dostać się do tego pliku (Plik5.rtf), aby dodać jeszcze kilka linijek tekstu przed tabelą (zwykły tekst poza tabelą).