title: How can I exchange rows in Word for all tables?
body: <p>I have 290 tables which have 14 rows for every table. I want to move row 12 to below row 13. Do you have any idea with macros?</p>
  
  <p>I tried copy it and delete duplicate ones, it works but I need it for 290 tables so I need a loop in VBA.</p>
  
  <pre><code>Sub Sample()
      Dim tbl As Table
      Set tbl = ActiveDocument.Tables(1)
      tbl.Rows(12).Range.Copy
      tbl.Rows(14).Range.Paste
  End Sub
  </code></pre>