WORD文書の一部をデータとして、VBにて取り込むには？

解決

---

VBにてWORD文書検索機能を作成しようとしています。
検索する際にWORD文章内の文章をTextBoxに表示させようとしていますが、
うまくできません。Selectionに関する良い方法を教えてください。

編集 削除

---

解決できました。
Set wdDoc = wdApp.Documents.Open(MyPath & DocName)
Set wdSelection = wdApp.Selection
    
With wdSelection
     'WORDの文書の取得
     .MoveRight Unit:=wdCell, Count:=1
     TxtTitle = .Text
     If Len(t_txt) < 4 Then
         .MoveRight Unit:=wdCell, Count:=3
         TxtTitle = .Text
     End If
     '全角を半角に変換
     TxtTitle = StrConv(TxtTitle, vbNarrow)
End With

以上です。

編集 削除

---

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文

←解決時は質問者本人がここをチェックしてください。