vba - 実行中の Word アプリケーションを別の Word から制御する方法

Question

実行中の単語アプリケーションを取得して、テキストを挿入したいと思います。

VBA/マクロ コードは、Word や Excel などの別の Microsoft アプリケーションから実行されます。これは可能ですか？

Answer 1

ありがとうカズジョー。ただし、開いている Word ドキュメントにテキストを追加し、別のテキストを追加したくはありません。コードに基づいて

Sub catch_word()
   Dim WRD As Object
   Dim WRD_WINDOWS As Object
   Dim strTemp As String

  On Error Resume Next
Set WRD = GetObject(, "Word.Application")

If WRD Is Nothing Then
    MsgBox "Word Application is not open"
Else

    Set WRD_WINDOWS = WRD.Windows

    For Each win In WRD_WINDOWS
        If (win.Document.FullName = "Document1") Then
            win.Document.Range(Start:=125, End:=134).Text = "Some Text"
            strTemp = win.Document.Range(Start:=5, End:=10).Text
        End If

    Next
End If