从绝对行号开始查找

时间:2016-06-29 13:01:09

标签: vba ms-word word-vba

我喜欢通过以下方式在文档内部选择:

Set rng = ThisDocument.Range(Start:=0, End:=0)

所以我的问题是:如果我知道绝对行号怎么能找到Start:

示例:对于绝对行号152(从单词的开头)如何计算单词直到该行?

1 个答案:

答案 0 :(得分:1)

您可以使用GoTo查找一行的Start

ThisDocument.GoTo(what:=wdGoToLine, Which:=wdGoToFirst, Count:=152).Start

虽然计算字符不是文字。

编辑:如果要计算单词,请将其用作范围的结尾

ThisDocument.Range(Start:=0, End:=ThisDocument.GoTo(what:=wdGoToLine, Which:=wdGoToFirst, Count:=152).Start).Words.Count

虽然可能有更好的方法。