title: VBA excel nesting data from excel into a table in word (copying excel data into Word table)
body: <p>I'm trying to paste a table into word from excel with VBA Excel. </p>
  
  <p>I'm pasting it into a cell in a single column table of 4 rows I created in Word. So it is essentially a nested table. </p>
  
  <p>I keep getting, </p>
  
  <blockquote>
    <p>Run-time error 4605: Method 'PasteAsNestedTable' of object Selection failed</p>
  </blockquote>
  
  <p>I'm trying to use PastAsNestedTable because otherwise I get the Run-time error about cells not matching as it is trying to merge the two tables. </p>
  
  <p>So I get it is saying <code>PasteAsNestedTable</code> isn't a method of selection but how do I get around this issue? </p>
  
  <p>My updated code goes:</p>
  
  <pre><code>Dim wdApp As Word.Application
  Dim wdDoc as Word.Document
  Dim tabl1 as Table, tabl2 as Table
  Set wdApp = new Word.Application
  With wdApp
       .visible = True
       .Activate
       .Document.Add(location)
  
  Set wdDoc=wdApp.ActiveDocument
  With wdApp
     Charts("chart1").ChartArea.Copy
       .Selection.GoTo what:=-1,Name:="chart1"
       .selection.Paste
  (Then add some more charts)
  
  End With 
  
  Sheets("Sheet1").Range("A1:F10").Copy
      Set wdDoc=wdApp.ActiveDocument
      wdDoc.Bookmarks("table").Range.PasteAsNestedTable
  
  With wdApp
  (Then repeat above pasting charts + tables)
  </code></pre>
  
  <p>`</p>
  
  <p>If I made the Range a <code>ListObjects</code> could I somehow copy it in that way?</p>