将WORD表转换为文本（集合中所请求的成员不存在。）

Question

也许比VBSCRIPT更像是WORD问题，但我的任务很简单，我只是不知道自己在做什么。

输入文件是和RTF，其中23个表由分节符分隔。除页眉和页脚外，所有内容均为表格。我想要么将每个表转换成一个文本，要么全部选中并全部转换。我最终将文档另存为文本文件。

以下内容转换一张表，然后给出收集错误。

  1  Const RTF="t_14.4.3.1_lbshift.rtf"
  2  Const WDFORMATCODE=2
  3  Set objWord = CreateObject("Word.Application")
  4  With objWord
  5     .Visible = True
  6     .DisplayAlerts = True
  7     Set objDoc = .Documents.Open(rtf)
  8     t0 = objDoc.Tables.Count
  9        wscript.echo "T0=",t0
 10     for i = 1 to objDoc.Tables.Count
 11        wscript.echo i
 12        .Selection.Tables(i).Select
 13        .Selection.Rows.ConvertToText()
 14        next
 15     End With

T0= 23
1
2

Stderr output:
RTF2PDF.vbs(12, 7) Microsoft Word: The requested member of the collection does not exist.