w.Visible = True w.Activate ()
Works great for me !!!
See other reasons.
eg
Dim oWord As Microsoft.Office.Interop.Word.Application = New Microsoft.Office.Interop.Word.Application Dim oDoc As Microsoft.Office.Interop.Word.Document = oWord.Documents.Open(Path) Dim range As Microsoft.Office.Interop.Word.Range = oDoc.Range range.Find.Execute("[NUM]", False, False, , , , , , , _NUM_, 2, False, ) oWord.Visible = True oWord.Activate()
The document comes forward.
Ggsoft
source share