Word 互操作 - 如何关闭一个 Word 窗口而不关闭所有窗口？

Question

我正在使用 Microsoft Word 主互操作程序集来从属 MS Word。我的应用程序打开自己的 Word 窗口（使用 Microsoft.Office.Interop.Word.Application）。应用完成其操作后，我想关闭打开的 Word 窗口，但我不想影响用户可能打开的其他 Word 窗口。如果我使用 Application.Quit 那么所有 Word 窗口最终都会关闭。如果我使用 Application.ActiveWindow.Close，则单词 document 将关闭，但我创建的 Word 窗口仍保持打开状态，并显示空白屏幕，这是不希望的。

如何通过其 API 告诉 Word 关闭我打开的 Word 实例而不影响其他实例？这与单击 Word 窗口右上角的 X 时的行为类似。

Answer 1

我意识到这有点晚了，但这对我有用；

创建 Word 应用程序对象时，创建一个临时 Word 对象，首先打开该对象，然后打开正确的 Word 文档...然后关闭临时文档。

这可能看起来浪费空间和内存，但这样做是确保您创建的 winword.exe 保持独立，并且新创建的 Word 文档不会挂接到您的文档中。

Private sub OpenWord()

Dim MyWord as Object
Dim MyTempWord as Object

//I use the CreateObject in my application, but this will be however 
//you declare your word application 

MyTempWord = CreateObject("Word.Application")
MyWord = CreateObject("Word.Application")
MyTempWord.Quit(SaveChanges:=0)


//*Carry on doing whatever your app does*

//*After Finishing App stuff Close it...*

     If MyWord IsNot Nothing Then
        MyWord.Quit(SaveChanges:=0)
        Marshal.FinalReleaseComObject(MyWord)
    End If

End Sub

要重现此问题，我必须在应用程序中打开 Word，然后通过快捷方式打开一个单独的 Word（Microsoft Office Word）。当我的应用程序调用 MyWord.Quit() 时，它将关闭两个文档实例。问题是新创建的文档挂接到应用程序创建的 WINWORD.EXE 中，因此当您关闭应用程序时，它会关闭其他文档（即使它们出现在不同的实例中）。

我花了很长时间才修复，希望对其他人有帮助！

Answer 2

使用 Word.Application.Quit() 和 Marshall.FinalReleaseComObject(Word.Application) 我已经能够同时打开多个 Word 实例，并且仅我想要关闭的特定实例。

以下是一些快速示例代码（来自 C# 控制台应用程序）：

using System.Runtime.InteropServices;
using Microsoft.Office.Interop.Word;

namespace WordTest
{
    internal class Program
    {
        private static void Main(string[] args)
        {
            var p = new Program();
            p.Test();
        }

        public void Test()
        {
            var msWord = new Application();

            CloseWord(msWord);
        }

        public void CloseWord(Application word)
        {
            if (word != null)
            {
                word.Quit();
                Marshal.FinalReleaseComObject(word);
            }
        }
    }
}

另请参阅：c# MSOffice Interop Word 不会杀死 winword.exe