Word.application.Selection.Find.Text複数のWordアプリケーションを開いている場合

Question

Word.Application.Selection.Findコマンドセットを使用すると、NullReferenceExceptionが実行される問題があります。このプログラムでは、私は、次のような新しいWord文書を初期化します。

Dim wrdApp As Word.application = New Word.Application 
Dim wrdDoc As Word.Document = New Word.Document       
wrdApp.Visible = True 

With wrdDoc 
    wrdApp.Selection.Find.ClearFormatting() 
    wrdApp.Selection.Find.Text = sequenceObject(i, 1, 1, 1).cat 
    wrdApp.Selection.Find.Forward = True 
    wrdApp.Selection.Find.Wrap = Word.WdFindWrap.wdFindContinue 
    wrdApp.Selection.Find.Execute 
End With 

私は前に、コードの実行に開放は窓を持っていない

、私は何の問題もありません。その時点で別の単語文書を開いていると、最初の Findコマンドでエラーが発生します。以前は ClearFormatting行で発生していました。私はそれをコメントアウトした後、 Find.Text行で発生しました。私は参照され、インポートされた正しいオブジェクトライブラリを持っています。

Answer 1

私はそれを理解しましたが、私は実際にどのドキュメントを選択するか指定していませんでした。使用することによって

wrdApp.ActiveDocument.ActiveWindow 

私は問題を解決することができました。