如何在单词范围内得到单词而不是字符？

Question

我希望通过使用单词vba来获得单词。

我尝试使用此API，但它只返回字符串序列。

  

Doucment.Range（开始，结束）

示例：

  

这是一本我从未读过的书。

输入：

  

API（2,5）

输出：

  

一本书，我

我希望某些API可以输入start的位置和end的位置，然后它会返回字符串。

有可能吗？

Answer 1

如果您想指定Range，则需要指定其Start和End。如果你不了解这些职位，你需要找到他们。以下代码就是这样做的。

Private Sub SelectWords()

    Dim Rng As Range

    With ActiveDocument
        Set Rng = .Words(2)
        With Rng
            .MoveEnd wdWord, 4
            Debug.Print .Text, .Start, .End
        End With
    End With
End Sub

我指出这不适用于中文＆＃34;字＆＃34;被视为双宽字符。在英语中，单词由其后面的字符定义，在大多数情况下是空格。