Converting a table to text (selecting it first): Return to List

  Selection.Tables(1).Select
  
Selection.Rows.ConvertToText Separator:=wdSeparateByTabs

Note to Webmaster