Exproting Datagridview data in present word file

See more:

VB

i have this code,

' Create Word Application
       Dim oWord As Word.Application = DirectCast(CreateObject("Word.Application"), Word.Application)

       ' Create new word document
       Dim oDoc As Word.Document = oWord.Documents.Add()
       oWord.Visible = True

       Dim headers = (From ch In MyBase.Columns _
                Let header = DirectCast(ch, ColumnHeader) _
                Select header.Text).ToArray()

       Dim items() = (From item In MyBase.Items _
             Let lvi = DirectCast(item, ListViewItem) _
             Select (From subitem In lvi.SubItems _
                 Let si = DirectCast(subitem, ListViewItem.ListViewSubItem) _
                 Select si.Text).ToArray()).ToArray()

       Dim table As String = String.Join(vbTab, headers) & Environment.NewLine
       For Each a In items
           table &= String.Join(vbTab, a) & Environment.NewLine
       Next
       table = table.TrimEnd(CChar(Environment.NewLine))
       Clipboard.SetText(table)

       Dim oTable As Word.Table = oDoc.Tables.Add(oDoc.Bookmarks.Item("\endofdoc").Range, items.Count + 1, headers.Count)
       oTable.Range.ParagraphFormat.SpaceAfter = 6

       oTable.Range.Paste()

       'make the first row bold, fs 14 + change textcolor
       oTable.Rows.Item(1).Range.Font.Bold = &H98967E
       oTable.Rows.Item(1).Range.Font.Size = 14
       oTable.Rows.Item(1).Range.Font.Color = Word.WdColor.wdColorWhite

       'change backcolor of first row
       oTable.Rows.Item(1).Range.Shading.Texture = Word.WdTextureIndex.wdTextureNone
       oTable.Rows.Item(1).Range.Shading.ForegroundPatternColor = Word.WdColor.wdColorAutomatic
       oTable.Rows.Item(1).Range.Shading.BackgroundPatternColor = Word.WdColor.wdColorPaleBlue

here we create new word file, then all datagridview data are add in word file instead of that, i want add all datagridview data in present word file, for that, what part of code i change for require output.


PLEASE TELL ME THE CHANGE IN CURRENT CODE FOR MY REQUIREMENT